ViewVC Help

View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing

root/public/ibx/trunk/examples/employee/unit1.lfm

Comparing ibx/trunk/examples/employee/unit1.lfm (file contents):
Revision 62 by tony, Wed Apr 12 09:19:59 2017 UTC vs.
Revision 291 by tony, Fri Apr 17 10:26:08 2020 UTC

#	Line 1 | Line 1
1		object Form1: TForm1
2	<	Left = 453
2	>	Left = 480
3		Height = 482
4	<	Top = 336
4	>	Top = 407
5		Width = 932
6		Caption = 'Employee List'
7		ClientHeight = 482
8		ClientWidth = 932
9	+	DefaultMonitor = dmPrimary
10		OnClose = FormClose
11		OnShow = FormShow
12	<	LCLVersion = '1.6.4.0'
12	>	Position = poMainFormCenter
13	>	LCLVersion = '2.0.5.0'
14		object Button1: TButton
15		Left = 845
16		Height = 25
#	Line 225 | Line 227 | object Form1: TForm1
227		Left = 688
228		Height = 27
229		Top = 16
230	<	Width = 48
230	>	Width = 47
231		Alignment = taRightJustify
232		Anchors = [akTop, akLeft, akBottom]
233		DataField = 'TOTALSALARIES'
#	Line 585 | Line 587 | object Form1: TForm1
587		BeforeOpen = EmployeesBeforeOpen
588		BufferChunks = 1000
589		CachedUpdates = False
590	+	CaseSensitiveParameterNames = False
591	+	EnableStatistics = False
592		GenerateParamNames = False
593		GeneratorField.ApplyOnEvent = gaeOnNewRecord
594	+	MasterDetailDelay = 0
595		SQL.Strings = (
596		'Select sum(Salary) as TotalSalaries'
597		'From EMPLOYEE'
#	Line 621 | Line 626 | object Form1: TForm1
626		AllowAutoActivateTransaction = False
627		Database = IBDatabase1
628		Transaction = IBTransaction1
629	+	ForcedRefresh = True
630		AfterDelete = EmployeesAfterDelete
631		AfterEdit = EmployeesAfterDelete
632		AfterInsert = EmployeesAfterInsert
633		AfterOpen = EmployeesAfterOpen
628	–	AfterPost = EmployeesAfterPost
634		AfterScroll = EmployeesAfterScroll
635		BeforeClose = EmployeesBeforeClose
636		BeforeOpen = EmployeesBeforeOpen
637		BufferChunks = 5000
638		CachedUpdates = False
639	+	CaseSensitiveParameterNames = True
640	+	EnableStatistics = False
641		DeleteSQL.Strings = (
642		'Delete From EMPLOYEE A'
643		'Where A.EMP_NO = :EMP_NO'
#	Line 683 | Line 690 | object Form1: TForm1
690		GeneratorField.Field = 'EMP_NO'
691		GeneratorField.ApplyOnEvent = gaeOnNewRecord
692		GenerateParamNames = False
693	+	MasterDetailDelay = 0
694		DataSetCloseAction = dcSaveChanges
695		AfterTransactionEnd = EmployeesAfterTransactionEnd
696		OnValidatePost = EmployeesValidatePost
#	Line 843 | Line 851 | object Form1: TForm1
851		BeforeOpen = CountriesBeforeOpen
852		BufferChunks = 1000
853		CachedUpdates = False
854	+	CaseSensitiveParameterNames = False
855	+	EnableStatistics = False
856		GenerateParamNames = False
857		GeneratorField.ApplyOnEvent = gaeOnNewRecord
858	+	MasterDetailDelay = 0
859		SQL.Strings = (
860		'Select A.COUNTRY, A.CURRENCY From COUNTRY A'
861		'JOIN JOB J On J.JOB_COUNTRY = A.COUNTRY'
#	Line 889 | Line 900 | object Form1: TForm1
900		BeforeOpen = JobCodesBeforeOpen
901		BufferChunks = 1000
902		CachedUpdates = False
903	+	CaseSensitiveParameterNames = False
904	+	EnableStatistics = False
905		GenerateParamNames = False
906		GeneratorField.ApplyOnEvent = gaeOnNewRecord
907	+	MasterDetailDelay = 0
908		SQL.Strings = (
909		'Select A.JOB_CODE, A.JOB_TITLE From JOB A'
910		'Where JOB_COUNTRY = :JOB_COUNTRY and JOB_GRADE = :JOB_GRADE'
#	Line 928 | Line 942 | object Form1: TForm1
942		Transaction = IBTransaction1
943		BufferChunks = 1000
944		CachedUpdates = False
945	+	CaseSensitiveParameterNames = False
946	+	EnableStatistics = False
947		GenerateParamNames = False
948		GeneratorField.ApplyOnEvent = gaeOnNewRecord
949	+	MasterDetailDelay = 0
950		SQL.Strings = (
951		'Select A.DEPT_NO, A.DEPARTMENT From DEPARTMENT A'
952		''

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines