/ CD Actual Thematic 7: Programming / CDAT7.iso / Database / ejemplos / multitier1 / Unit2.dcu

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| d8 a6 68 47 49 0a 00 00 | d6 7b 7d 26 8b 58 f4 fa |..hGI...|.{}&.X..|
|00000010| 00 96 00 3c 70 09 55 6e | 69 74 32 2e 70 61 73 d0 |...<p.Un|it2.pas.|
|00000020| 7b 7d 26 00 72 09 55 6e | 69 74 32 2e 44 46 4d af |{}&.r.Un|it2.DFM.|
|00000030| 7b 7d 26 02 64 02 44 62 | be 5a 6b 98 63 64 08 44 |{}&.d.Db|.Zk.cd.D|
|00000040| 42 54 61 62 6c 65 73 be | 5a 6b 98 66 06 54 54 61 |BTables.|Zk.f.TTa|
|00000050| 62 6c 65 23 b1 11 de 66 | 09 54 44 61 74 61 62 61 |ble#...f|.TDataba|
|00000060| 73 65 7a 40 b4 c0 66 08 | 54 53 65 73 73 69 6f 6e |sez@..f.|TSession|
|00000070| c9 2a 90 c4 67 07 2e 54 | 54 61 62 6c 65 7d 9a e8 |.*..g..T|Table}..|
|00000080| c9 67 0a 2e 54 44 61 74 | 61 62 61 73 65 d4 29 8b |.g..TDat|abase.).|
|00000090| ac 67 09 2e 54 53 65 73 | 73 69 6f 6e 23 14 67 b0 |.g..TSes|sion#.g.|
|000000a0| 63 64 0c 50 72 6f 6a 65 | 63 74 31 5f 54 4c 42 8b |cd.Proje|ct1_TLB.|
|000000b0| 58 f4 fa 66 06 49 6e 75 | 65 76 61 66 67 ef 72 67 |X..f.Inu|evafg.rg|
|000000c0| 0b 43 4c 41 53 53 5f 6e | 75 65 76 61 6d ec 92 90 |.CLASS_n|uevam...|
|000000d0| 63 64 08 44 42 43 6c 69 | 65 6e 74 be 5a 6b 98 63 |cd.DBCli|ent.Zk.c|
|000000e0| 64 07 44 61 74 61 42 6b | 72 be 5a 6b 98 66 11 54 |d.DataBk|r.Zk.f.T|
|000000f0| 52 65 6d 6f 74 65 44 61 | 74 61 4d 6f 64 75 6c 65 |RemoteDa|taModule|
|00000100| 33 73 9f 43 67 12 2e 54 | 52 65 6d 6f 74 65 44 61 |3s.Cg..T|RemoteDa|
|00000110| 74 61 4d 6f 64 75 6c 65 | 8d 5c 76 2f 63 64 07 42 |taModule|.\v/cd.B|
|00000120| 64 65 50 72 6f 76 be 5a | 6b 98 63 64 06 53 74 64 |deProv.Z|k.cd.Std|
|00000130| 56 43 4c be 5a 6b 98 66 | 09 49 50 72 6f 76 69 64 |VCL.Zk.f|.IProvid|
|00000140| 65 72 0d 55 cb cf 63 64 | 06 56 43 4c 43 6f 6d be |er.U..cd|.VCLCom.|
|00000150| 5a 6b 98 66 11 54 43 6f | 6d 70 6f 6e 65 6e 74 46 |Zk.f.TCo|mponentF|
|00000160| 61 63 74 6f 72 79 a7 e3 | 79 04 67 12 2e 54 43 6f |actory..|y.g..TCo|
|00000170| 6d 70 6f 6e 65 6e 74 46 | 61 63 74 6f 72 79 01 cd |mponentF|actory..|
|00000180| 50 f0 67 18 54 43 6f 6d | 70 6f 6e 65 6e 74 46 61 |P.g.TCom|ponentFa|
|00000190| 63 74 6f 72 79 2e 43 72 | 65 61 74 65 97 a6 67 28 |ctory.Cr|eate..g(|
|000001a0| 63 64 06 43 6f 6d 4f 62 | 6a be 5a 6b 98 66 10 54 |cd.ComOb|j.Zk.f.T|
|000001b0| 43 6c 61 73 73 49 6e 73 | 74 61 6e 63 69 6e 67 5c |ClassIns|tancing\|
|000001c0| 88 c2 33 67 0f 63 69 4d | 75 6c 74 69 49 6e 73 74 |..3g.ciM|ultiInst|
|000001d0| 61 6e 63 65 b6 31 37 dc | 66 0f 54 54 68 72 65 61 |ance.17.|f.TThrea|
|000001e0| 64 69 6e 67 4d 6f 64 65 | 6c f6 15 ef 49 67 0b 74 |dingMode|l...Ig.t|
|000001f0| 6d 41 70 61 72 74 6d 65 | 6e 74 4f bf 63 f2 63 64 |mApartme|ntO.c.cd|
|00000200| 07 43 6f 6d 53 65 72 76 | be 5a 6b 98 67 09 43 6f |.ComServ|.Zk.g.Co|
|00000210| 6d 53 65 72 76 65 72 6b | c9 46 c1 63 64 07 44 69 |mServerk|.F.cd.Di|
|00000220| 61 6c 6f 67 73 be 5a 6b | 98 63 64 05 46 6f 72 6d |alogs.Zk|.cd.Form|
|00000230| 73 be 5a 6b 98 67 1c 54 | 44 61 74 61 4d 6f 64 75 |s.Zk.g.T|DataModu|
|00000240| 6c 65 2e 47 65 74 50 72 | 6f 76 69 64 65 72 4e 61 |le.GetPr|oviderNa|
|00000250| 6d 65 73 47 19 fc a4 67 | 1c 54 44 61 74 61 4d 6f |mesG...g|.TDataMo|
|00000260| 64 75 6c 65 2e 44 65 66 | 69 6e 65 50 72 6f 70 65 |dule.Def|inePrope|
|00000270| 72 74 69 65 73 45 19 fc | a4 67 15 54 44 61 74 61 |rtiesE..|.g.TData|
|00000280| 4d 6f 64 75 6c 65 2e 52 | 65 61 64 53 74 61 74 65 |Module.R|eadState|
|00000290| 48 19 fc a4 67 1a 54 44 | 61 74 61 4d 6f 64 75 6c |H...g.TD|ataModul|
|000002a0| 65 2e 55 70 64 61 74 65 | 52 65 67 69 73 74 72 79 |e.Update|Registry|
|000002b0| 49 19 fc a4 67 12 54 44 | 61 74 61 4d 6f 64 75 6c |I...g.TD|ataModul|
|000002c0| 65 2e 43 72 65 61 74 65 | 4a 19 fc a4 67 13 54 44 |e.Create|J...g.TD|
|000002d0| 61 74 61 4d 6f 64 75 6c | 65 2e 44 65 73 74 72 6f |ataModul|e.Destro|
|000002e0| 79 4c 19 fc a4 67 1d 54 | 44 61 74 61 4d 6f 64 75 |yL...g.T|DataModu|
|000002f0| 6c 65 2e 41 66 74 65 72 | 43 6f 6e 73 74 72 75 63 |le.After|Construc|
|00000300| 74 69 6f 6e 4d 19 fc a4 | 67 1d 54 44 61 74 61 4d |tionM...|g.TDataM|
|00000310| 6f 64 75 6c 65 2e 42 65 | 66 6f 72 65 44 65 73 74 |odule.Be|foreDest|
|00000320| 72 75 63 74 69 6f 6e 4e | 19 fc a4 63 64 08 43 6f |ructionN|...cd.Co|
|00000330| 6e 74 72 6f 6c 73 be 5a | 6b 98 63 64 08 47 72 61 |ntrols.Z|k.cd.Gra|
|00000340| 70 68 69 63 73 be 5a 6b | 98 63 64 07 43 6c 61 73 |phics.Zk|.cd.Clas|
|00000350| 73 65 73 be 5a 6b 98 67 | 1b 54 43 6f 6d 70 6f 6e |ses.Zk.g|.TCompon|
|00000360| 65 6e 74 2e 47 65 74 54 | 79 70 65 49 6e 66 6f 43 |ent.GetT|ypeInfoC|
|00000370| 6f 75 6e 74 1a fd e5 32 | 67 16 54 43 6f 6d 70 6f |ount...2|g.TCompo|
|00000380| 6e 65 6e 74 2e 47 65 74 | 54 79 70 65 49 6e 66 6f |nent.Get|TypeInfo|
|00000390| 1b fd e5 32 67 18 54 43 | 6f 6d 70 6f 6e 65 6e 74 |...2g.TC|omponent|
|000003a0| 2e 47 65 74 49 44 73 4f | 66 4e 61 6d 65 73 1c fd |.GetIDsO|fNames..|
|000003b0| e5 32 67 11 54 43 6f 6d | 70 6f 6e 65 6e 74 2e 49 |.2g.TCom|ponent.I|
|000003c0| 6e 76 6f 6b 65 1d fd e5 | 32 67 12 54 43 6f 6d 70 |nvoke...|2g.TComp|
|000003d0| 6f 6e 65 6e 74 2e 5f 41 | 64 64 52 65 66 18 fd e5 |onent._A|ddRef...|
|000003e0| 32 67 13 54 43 6f 6d 70 | 6f 6e 65 6e 74 2e 5f 52 |2g.TComp|onent._R|
|000003f0| 65 6c 65 61 73 65 19 fd | e5 32 67 11 54 43 6f 6d |elease..|.2g.TCom|
|00000400| 70 6f 6e 65 6e 74 2e 4c | 6f 61 64 65 64 08 fd e5 |ponent.L|oaded...|
|00000410| 32 67 17 54 43 6f 6d 70 | 6f 6e 65 6e 74 2e 4e 6f |2g.TComp|onent.No|
|00000420| 74 69 66 69 63 61 74 69 | 6f 6e 09 fd e5 32 67 12 |tificati|on...2g.|
|00000430| 54 43 6f 6d 70 6f 6e 65 | 6e 74 2e 53 65 74 4e 61 |TCompone|nt.SetNa|
|00000440| 6d 65 0d fd e5 32 67 19 | 54 43 6f 6d 70 6f 6e 65 |me...2g.|TCompone|
|00000450| 6e 74 2e 56 61 6c 69 64 | 61 74 65 52 65 6e 61 6d |nt.Valid|ateRenam|
|00000460| 65 13 fd e5 32 67 15 54 | 43 6f 6d 70 6f 6e 65 6e |e...2g.T|Componen|
|00000470| 74 2e 57 72 69 74 65 53 | 74 61 74 65 16 fd e5 32 |t.WriteS|tate...2|
|00000480| 67 19 54 43 6f 6d 70 6f | 6e 65 6e 74 2e 51 75 65 |g.TCompo|nent.Que|
|00000490| 72 79 49 6e 74 65 72 66 | 61 63 65 17 fd e5 32 67 |ryInterf|ace...2g|
|000004a0| 1c 54 43 6f 6d 70 6f 6e | 65 6e 74 2e 53 61 66 65 |.TCompon|ent.Safe|
|000004b0| 43 61 6c 6c 45 78 63 65 | 70 74 69 6f 6e 2b fd e5 |CallExce|ption+..|
|000004c0| 32 67 14 54 50 65 72 73 | 69 73 74 65 6e 74 2e 41 |2g.TPers|istent.A|
|000004d0| 73 73 69 67 6e 54 6f 2c | bd fb a5 67 12 54 50 65 |ssignTo,|...g.TPe|
|000004e0| 72 73 69 73 74 65 6e 74 | 2e 41 73 73 69 67 6e 30 |rsistent|.Assign0|
|000004f0| bd fb a5 63 64 08 53 79 | 73 55 74 69 6c 73 be 5a |...cd.Sy|sUtils.Z|
|00000500| 6b 98 63 64 08 4d 65 73 | 73 61 67 65 73 be 5a 6b |k.cd.Mes|sages.Zk|
|00000510| 98 63 64 07 57 69 6e 64 | 6f 77 73 be 5a 6b 98 63 |.cd.Wind|ows.Zk.c|
|00000520| 64 07 53 79 73 49 6e 69 | 74 be 5a 6b 98 63 64 06 |d.SysIni|t.Zk.cd.|
|00000530| 53 79 73 74 65 6d be 5a | 6b 98 67 10 54 4f 62 6a |System.Z|k.g.TObj|
|00000540| 65 63 74 2e 44 69 73 70 | 61 74 63 68 e5 dd 8b 52 |ect.Disp|atch...R|
|00000550| 67 16 54 4f 62 6a 65 63 | 74 2e 44 65 66 61 75 6c |g.TObjec|t.Defaul|
|00000560| 74 48 61 6e 64 6c 65 72 | e6 dd 8b 52 67 13 54 4f |tHandler|...Rg.TO|
|00000570| 62 6a 65 63 74 2e 4e 65 | 77 49 6e 73 74 61 6e 63 |bject.Ne|wInstanc|
|00000580| 65 e7 dd 8b 52 67 14 54 | 4f 62 6a 65 63 74 2e 46 |e...Rg.T|Object.F|
|00000590| 72 65 65 49 6e 73 74 61 | 6e 63 65 e8 dd 8b 52 67 |reeInsta|nce...Rg|
|000005a0| 14 40 48 61 6e 64 6c 65 | 41 75 74 6f 45 78 63 65 |.@Handle|AutoExce|
|000005b0| 70 74 69 6f 6e 58 2c 54 | 64 67 0e 40 48 61 6e 64 |ptionX,T|dg.@Hand|
|000005c0| 6c 65 46 69 6e 61 6c 6c | 79 58 2c 54 64 63 28 00 |leFinall|yX,Tdc(.|
|000005d0| 00 00 91 02 26 07 2e 54 | 6e 75 65 76 61 80 48 6e |....&..T|nueva.Hn|
|000005e0| 20 d0 14 00 2a 06 54 6e | 75 65 76 61 88 ee 84 49 | ...*.Tn|ueva...I|
|000005f0| e4 16 20 05 6e 75 65 76 | 61 e6 fc ea 62 e4 16 30 |.. .nuev|a...b..0|
|00000600| 20 02 2e 32 66 18 00 28 | 11 54 6e 75 65 76 61 2e | ..2f..(|.Tnueva.|
|00000610| 47 65 74 5f 54 61 62 6c | 65 31 80 e1 47 37 08 00 |Get_Tabl|e1..G7..|
|00000620| 98 0c 0c 84 21 04 53 65 | 6c 66 16 16 06 23 06 52 |....!.Se|lf...#.R|
|00000630| 65 73 75 6c 74 4d 02 0c | 18 63 28 0c 46 69 6e 61 |esultM..|.c(.Fina|
|00000640| 6c 69 7a 61 74 69 6f 6e | 80 58 2c 54 64 00 5c 21 |lization|.X,Td.\!|
|00000650| 20 1a 63 28 05 55 6e 69 | 74 32 80 00 00 00 00 00 | .c(.Uni|t2......|
|00000660| 5c 21 10 1a 63 47 00 08 | 00 16 0d 03 46 3c 08 8e |\!..cG..|....F<..|
|00000670| 0a 00 71 01 8c 18 e0 0a | 26 02 08 b0 2c 06 54 61 |..q.....|&...,.Ta|
|00000680| 62 6c 65 31 14 02 31 01 | 2c 09 44 61 74 61 62 61 |ble1..1.|,.Databa|
|00000690| 73 65 31 14 04 41 01 2c | 08 53 65 73 73 69 6f 6e |se1..A.,|.Session|
|000006a0| 31 14 06 51 01 2d 0a 47 | 65 74 5f 54 61 62 6c 65 |1..Q.-.G|et_Table|
|000006b0| 31 08 ee 94 63 44 00 08 | 00 18 ff 00 00 00 80 ff |1...cD..|........|
|000006c0| ff ff ff ff ff ff ff 7f | 00 00 00 00 10 40 00 00 |........|.....@..|
|000006d0| 00 6c b5 08 cc 83 44 24 | 04 a8 e9 00 00 00 00 83 |.l....D$|........|
|000006e0| 44 24 04 a8 e9 00 00 00 | 00 83 44 24 04 a8 e9 00 |D$......|..D$....|
|000006f0| 00 00 00 83 44 24 04 a8 | e9 00 00 00 00 83 44 24 |....D$..|......D$|
|00000700| 04 a8 e9 00 00 00 00 83 | 44 24 04 a8 e9 00 00 00 |........|D$......|
|00000710| 00 83 44 24 04 a8 8b 44 | 24 04 8b 00 ff 60 28 83 |..D$...D|$....`(.|
|00000720| 44 24 04 a8 e9 00 00 00 | 00 83 44 24 04 a8 e9 00 |D$......|..D$....|
|00000730| 00 00 00 cc 3d 00 00 00 | 4b 00 00 00 55 00 00 00 |....=...|K...U...|
|00000740| 15 00 00 00 1f 00 00 00 | 29 00 00 00 33 00 00 00 |........|)...3...|
|00000750| 0b 00 00 00 01 00 00 00 | 01 00 00 00 c1 bc 03 e8 |........|........|
|00000760| eb e5 d2 11 96 2a 00 00 | e8 5e 74 43 60 00 00 00 |.....*..|.^tC`...|
|00000770| 58 00 00 00 00 00 00 00 | 4c 00 00 00 84 00 00 00 |X.......|L.......|
|00000780| 00 00 00 00 00 00 00 00 | 04 00 00 00 7c 00 00 00 |........|....|...|
|00000790| 00 00 00 00 00 00 00 00 | ae 00 00 00 5c 00 00 00 |........|....\...|
|000007a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 00 00 03 00 b5 00 | 00 00 4c 00 00 00 00 00 |........|..L.....|
|00000800| 06 54 61 62 6c 65 31 50 | 00 00 00 01 00 09 44 61 |.Table1P|......Da|
|00000810| 74 61 62 61 73 65 31 54 | 00 00 00 02 00 08 53 65 |tabase1T|......Se|
|00000820| 73 73 69 6f 6e 31 06 54 | 6e 75 65 76 61 03 00 00 |ssion1.T|nueva...|
|00000830| 00 00 00 00 00 00 00 00 | 00 00 00 04 00 00 00 07 |........|........|
|00000840| 06 54 6e 75 65 76 61 4c | 00 00 00 00 00 00 00 05 |.TnuevaL|........|
|00000850| 00 05 55 6e 69 74 32 00 | 00 55 8b ec 53 56 57 8b |..Unit2.|.U..SVW.|
|00000860| 5d 08 8b 45 0c 85 c0 74 | 04 33 d2 89 10 53 33 c0 |]..E...t|.3...S3.|
|00000870| 55 68 3e 00 00 00 64 ff | 30 64 89 20 8b 55 0c 8b |Uh>...d.|0d. .U..|
|00000880| 43 4c 8b 08 ff 91 0c 02 | 00 00 33 c0 5a 59 59 64 |CL......|..3.ZYYd|
|00000890| 89 10 58 33 db eb 05 e9 | 00 00 00 00 8b c3 5f 5e |..X3....|......_^|
|000008a0| 5b 5d c2 08 00 55 8b ec | 33 c0 55 68 25 00 00 00 |[]...U..|3.Uh%...|
|000008b0| 64 ff 30 64 89 20 ff 05 | 00 00 00 00 33 c0 5a 59 |d.0d. ..|....3.ZY|
|000008c0| 59 64 89 10 68 2c 00 00 | 00 c3 e9 00 00 00 00 eb |Yd..h,..|........|
|000008d0| f8 5d c3 83 2d 00 00 00 | 00 01 73 24 a1 00 00 00 |.]..-...|..s$....|
|000008e0| 00 50 a1 00 00 00 00 50 | 6a 02 6a 01 8b 0d 00 00 |.P.....P|j.j.....|
|000008f0| 00 00 8b 09 b2 01 a1 00 | 00 00 00 e8 00 00 00 00 |........|........|
|00000900| c3 6d 8c 00 05 8a 0e 02 | 94 14 02 40 14 02 56 14 |.m......|...@..V.|
|00000910| 02 58 14 02 5a 14 02 5c | 30 02 5e 14 02 60 0a 01 |.X..Z..\|0.^..`..|
|00000920| 8a 08 01 8a 08 01 8a 08 | 01 8a 08 01 8a 08 01 8a |........|........|
|00000930| 08 01 8a 08 01 8a 08 01 | 8a 30 01 8a 18 05 8c 00 |........|.0......|
|00000940| 01 8c 08 01 8a 18 01 8e | 08 01 8c 18 01 8c 10 01 |........|........|
|00000950| 1e 08 01 6e 08 01 4c 08 | 01 4e 08 01 7e 08 01 80 |...n..L.|.N..~...|
|00000960| 08 01 82 08 01 84 08 01 | 4a 08 01 70 08 01 42 08 |........|J..p..B.|
|00000970| 01 72 08 01 62 08 01 64 | 08 01 44 08 01 66 08 01 |.r..b..d|..D..f..|
|00000980| 46 08 01 68 08 01 6a 08 | 01 6c 08 01 48 0c 01 8c |F..h..j.|.l..H...|
|00000990| 72 01 0c 08 01 0e 08 01 | 10 08 05 8e 00 01 8e 18 |r.......|........|
|000009a0| 01 8c 08 01 1c 1c 05 94 | 32 01 94 4c 02 86 1a 05 |........|2..L....|
|000009b0| 9a 0e 01 9a 18 01 92 1a | 01 9a 0c 02 88 10 05 9c |........|........|
|000009c0| 04 01 92 10 01 8c 0c 03 | 16 16 03 3a 12 01 2a 0a |........|...:..*.|
|000009d0| 02 2c 0a 06 9c 90 0e 2a | 00 14 15 06 02 46 02 44 |.,.....*|.....F.D|
|000009e0| 04 6a 02 12 04 48 91 02 | 02 4e 00 92 02 16 00 00 |.j...H..|.N......|
|000009f0| 18 12 93 16 1a 9c 00 02 | 00 02 8e 00 02 00 16 8e |........|........|
|00000a00| 02 02 00 18 8e 04 02 00 | 1a 8e 06 02 00 1c 94 00 |........|........|
|00000a10| 06 04 2a 28 3c 8e 08 02 | 00 28 90 00 02 00 30 96 |..*(<...|.(....0.|
|00000a20| 00 02 00 00 98 00 02 00 | 3e 9a 00 02 00 4c 94 10 |........|>....L..|
|00000a30| 94 40 00 10 70 32 96 46 | 06 96 8a fe 9a 20 00 00 |.@..p2.F|..... ..|
|00000a40| 00 10 9c 20 00 00 00 00 | 61                      |... ....|a       |
+--------+-------------------------+-------------------------+--------+--------+