0% found this document useful (0 votes)
12K views

Delphi Technical Reference Card 7 20

The document contains a reference card with symbolic constants and their values for keyboard keys and mouse buttons. It also includes format specifiers and functions for formatting strings, numbers, and dates in Delphi.

Uploaded by

sakworld
Copyright
© Attribution Non-Commercial (BY-NC)
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PDF or read online on Scribd
0% found this document useful (0 votes)
12K views

Delphi Technical Reference Card 7 20

The document contains a reference card with symbolic constants and their values for keyboard keys and mouse buttons. It also includes format specifiers and functions for formatting strings, numbers, and dates in Delphi.

Uploaded by

sakworld
Copyright
© Attribution Non-Commercial (BY-NC)
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PDF or read online on Scribd
You are on page 1/ 2

http://books24x7.blogspot.

com

Delphi Technical Reference Card VII Symbolic constant name Format Strings: Math Expressions:
GulfCoastal.bizland.com | Value (hexadecimal) Format('%.3d', [<integer: 4>]); '004' Absolute value: x := Abs(x);
| | Mouse/keyboard equivalent Format('%2.2d%2.2d%4d', [1,1,2000]); '01012000' Addition: x := y + z;
| | | Format('%.0n', [<real: 1234567>]); '1,234,567' Address of operator: ptr := @ThisRecord;
Symbolic constant name VK_SEPARATOR 6C Separator key Format('%.2n', [<real: 12345.675>]); '12,345.68' Array subscript operator: x := ThisArray[5];
| Value (hexadecimal) VK_SUBTRACT 6D Subtract key Format('%m', [<real: 12.34567>]); '$12.35' Assignment: x := 10;
| | Mouse/keyboard equivalent VK_DECIMAL 6E Decimal key Format('%x', [<integer: 43>]); '2B' Bitwise AND: x := x AND $02;
| | | VK_DIVIDE 6F Divide key Format('%p', [<pointer>]); '8 chr adr' Bitwise NOT: x := x AND NOT $02;
VK_LBUTTON 01 Left mouse button VK_F1 70 F1 key Format('%s string.', ['Some']); 'Some string.' Bitwise OR: x := x OR $FF;
VK_RBUTTON 02 Right mouse button VK_F2 71 F2 key Format('{%−4.3s} {%4.2s}', ['L123', 'R123']); Bitwise SHL: x := x SHL $02;
VK_CANCEL 03 Control−break processing VK_F3 72 F3 key '{L12 } { R1}' Bitwise SHR: x := x SHR $02;
VK_MBUTTON 04 Middle mouse button VK_F4 73 F4 key Format('%2:s %1:s %0:s', ['1st', '2nd', '3rd']); Bitwise XOR: x := x XOR y;
05−07 Undefined VK_F5 74 F5 key '3rd 2nd 1st' Decrement: Dec(x); Dec(x, 2);
VK_BACK 08 BACKSPACE key VK_F6 75 F6 key Format('{%*.*f}', [<len: 9>, <dec: 4>, 100*PI]); Equal to: if (x = 10) ...
VK_TAB 09 TAB key VK_F7 76 F7 key '{ 314.1593}' Fraction return: x := Frac(x);
0A−0B Undefined VK_F8 77 F8 key FloatToStrF(123.45, ffFixed, <len: 4>,<dec: 1>); Greater than or equal to: if (x >= 10) ...
VK_CLEAR 0C CLEAR key VK_F9 78 F9 key '123.5' Greater than: if (x > 10) ...
VK_RETURN 0D ENTER key VK_F10 79 F10 key FormatMaskText('0−00−00;0;_', '12345');'1−23−45' Hex value operator: x := $FF;
0E−0F Undefined VK_F11 7A F11 key FormatFloat('#00,000.0##', 1234.400); '01,234.4' Increment: Inc(x); Inc(x, 2);
VK_SHIFT 10 SHIFT key VK_F12 7B F12 key Integer division: x := y Div 10;
VK_CONTROL 11 CTRL key VK_F13 7C F13 key Date/Time Formats:
FormatDateTime('mm/dd/yyyy', Now); '09/07/2000' Less than or equal to: if (x <= 10) ...
VK_MENU 12 ALT key VK_F14 7D F14 key Less than: if (x < 10) ...
VK_PAUSE 13 PAUSE key VK_F15 7E F15 key FormatDateTime('hh:n:ss', Now); '09:5:59'
FormatDateTime('<Specifier>', Now); Logical AND: if (x = 1) And (y = 2)..
VK_CAPITAL 14 CAPS LOCK key VK_F16 7F F16 key Logical NOT: if Not Valid then ...
15−19 Resv Kanji systems VK_F17 80H F17 key <c> 7/29/00 5:24:08 PM;
<m> 7; <mm> 07; <mmm> Jul; <mmmm> July; Logical OR: if (x = 1) Or (y = 2)...
1A Undefined VK_F18 81H F18 key Maximum number return: x := Max(x, y);
VK_ESCAPE 1B ESC key VK_F19 82H F19 key <d> 1; <dd> 01; <ddd> Sun; <dddd> Sunday;
<ddddd> 7/9/00; <dddddd> Sunday, July 09, 2000; Membership (dot) operator: x := Record.Data;
1C−1F Resv Kanji systems VK_F20 83H F20 key Minimum number return: x := Min(x, y);
VK_SPACE 20 SPACEBAR VK_F21 84H F21 key <yy> 00; <yyyy> 2000;
<h> 9; <hh> 09; <n> 7; <nn> 07; <s> 9; <ss> 09; Multiplication: x := y * z;
VK_PRIOR 21 PAGE UP key VK_F22 85H F22 key Not equal to: if (x <> 10) ...
VK_NEXT 22 PAGE DOWN key VK_F23 86H F23 key <t> 5:38 PM; <tt> 5:38:28 PM;
<am/pm> pm; <a/p> a; <ampm> PM; </> /; <:> : Odd number: if Odd(9) ...
VK_END 23 END key VK_F24 87H F24 key Ord: x := Ord('<character>');
VK_HOME 24 HOME key 88−8F Unassigned String Manipulation: Pi: x := Pi;
VK_LEFT 25 LEFT ARROW key VK_NUMLOCK 90 NUM LOCK key Chr(<Integer>); Pointer operator: ThisObject.Data^;
VK_UP 26 UP ARROW key VK_SCROLL 91 SCROLL LOCK key Copy(<SourceString>, <start pos>, <length>); Real division: x := y / 3.14;
VK_RIGHT 27 RIGHT ARROW key 92−B9 Unassigned CompareStr(<SourceString1>, <SourceString2>); Remainder: x := y Mod 2;
VK_DOWN 28 DOWN ARROW key BA−C0 OEM specific Delete(<SourceString>, <start pos>, <length>); Round to negative: x := Floor(x);
VK_SELECT 29 SELECT key C1−DA Unassigned IntToStr(<SourceInteger>); Round to positive: x := Ceil(x);
2A OEM specific DB−E4 OEM specific Insert(<fromSourceString>, <toSourceString>, Square: x := Sqr(x);
VK_EXECUTE 2B EXECUTE key E5 Unassigned <start pos>); Square root: x := Sqrt(x);
VK_SNAPSHOT 2C Print Screen key E6 OEM specific Length(<SourceString>); Subtraction: x := y − z;
VK_INSERT 2D INS key E7−E8 Unassigned Pos('<find this>', <SourceString>); Return integer rounded toward zero:
VK_DELETE 2E DEL key E9−F5 OEM specific SetLength(<SourceString>, <length>); FloatValue := Int(Real);
VK_HELP 2F HELP key VK_ATTN F6 Attn key StringOfChar('<Character>', <quantity>); Discard decimals and return Integer:
VK_0 30 0 key VK_CRSEL F7 CrSel key StrPas(<PCharString>); Int64Value := Trunc(Real);
VK_1 31 1 key VK_EXSEL F8 ExSel key StrPCopy(<SourceString>); Round to the nearest whole number:
VK_2 32 2 key VK_EREOF F9 Erase EOF key StrToInt(<SourceString>); Int64Value := Round(Real);
VK_3 33 3 key VK_PLAY FA Play key StrToIntDef(<SourceString>, <DefaultInteger>);
VK_4 34 4 key VK_ZOOM FB Zoom key StrTo<???>(<SourceString>); Numeric Variables:
VK_5 35 5 key VK_NONAME FC Reserved for future use. <???>ToStr(<Source???>); ??? = Float, Currency, Type Size Range of Values
VK_6 36 6 key VK_PA1 FD PA1 key Date, Time, DateTime Boolean 1 True or False
VK_7 37 7 key VK_OEM_CLEAR FE Clear key StringReplace(<SourceString>, '<replace this>', Byte 1 0 to 255
VK_8 38 8 key FF Unassigned '<with this>', [rfReplaceAll]); Cardinal 4 0 to 4,294,967,295
VK_9 39 9 key Trim(<SourceString>); trim l/r blanks Char 1 0 to 255
3A−5A Undefined File: TrimLeft(<SourceString>); trim left blanks Comp 8 −9,223,372,036,854,775,808 to
VK_LWIN 5B Left Windows key (MS Keybd) FPath := GetCurrentDir; TrimRight(<SourceString>); trim right blanks 9,223,372,036,854,775,807
VK_RWIN 5C Right Windows key (MS Keybd) OpenDialog1.InitialDir := FPath; LowerCase(<SourceString>); Currency 8 −922,337,203,685,477.5808 to
VK_APPS 5D Applications key (MS Keybd) UpperCase(<SourceString>); 922,337,203,685,477.5807
5E−5F Undefined ExtractFileDrive('<file name>') C: UpCase(<Char>); Double 8 5.0 ¥ 10−324 to 1.7 ¥ 10308
VK_NUMPAD0 60 Numeric keypad 0 key ExtractFileDir('<file name>') C:\<path> Extended 10 3.4 ¥ 10−4932 to 1.1 ¥ 104932
Sets: Int64 8 −9,223,372,036,854,775,808 to
VK_NUMPAD1 61 Numeric keypad 1 key ExtractFilePath('<file name>') C:\<path>\ ThisSet : set of byte; [0−255]
VK_NUMPAD2 62 Numeric keypad 2 key ExtractFileName('<file name>') fname.ext 9,223,372,036,854,775,807
ThisSet := [1, 2, 3, 7]; initialize to 1,2,3,7 Integer 4 −2,147,483,648 to 2,147,483,647
VK_NUMPAD3 63 Numeric keypad 3 key ExtractFileExt('<file name>') .ext ThisSet := ThisSet − [3]; exclude number 3
VK_NUMPAD4 64 Numeric keypad 4 key ExtractFilePath(Application.ExeName) app path LongInt 4 −2,147,483,648 to 2,147,483,647
ThisSet := ThisSet + [5]; include number 5 LongWord 4 0 to 4,294,967,295
VK_NUMPAD5 65 Numeric keypad 5 key ThisSet := []; purge all numbers
VK_NUMPAD6 66 Numeric keypad 6 key DirectoryExists('<folder>') [use FileCtrl] Real 8 5.0 ¥ 10−324 to 1.7 ¥ 10308
if 7 in ThisSet ... ShortInt 1 −128 to 127
VK_NUMPAD7 67 Numeric keypad 7 key CreateDir('<folder>')
VK_NUMPAD8 68 Numeric keypad 8 key Pointer: Single 4 1.5 ¥ 10−45 to 3.4 ¥ 1038
VK_NUMPAD9 69 Numeric keypad 9 key OpenDialog1.Filter := Pt : pointer; CharSet := 'AbCd'; Data : string; SmallInt 2 −32,768 to 32,767
VK_MULTIPLY 6A Multiply key 'Text Files (*.txt)|*.txt|All (*.*)|*.*'; Pt := @CharSet; WideChar 2 0 to 65,535
VK_ADD 6B Add key OpenDialog1.FilterIndex := 1; List .txt files Data := PChar(Pt^); Data = 'AbCd' Word 2 0 to 65,535
OpenDialog1.Execute; Data := PChar(Pt^)[0]; Data = 'A' Variant 16 All above
http://books24x7.blogspot.com

Delphi Technical Reference Card VII Bitwise Operations: Definitions:


GulfCoastal.hypermart.net [Byte: 1111 0000 Mask Order: 7654 3210] Class: a collection of procedures, functions
# $ Byte OR (1 SHL 0); set bit 1 (1111 0001) and other fields that make up a specific
Dec Hex Fn Binary Dec Hex Fn Binary Dec Hex Fn Binary Dec Hex Fn Binary Byte AND (NOT (1 SHL 5)); zero bit 6 (1101 0000) programming task.
00 00 0000 0000 64 40 @ 0100 0000 128 80 1000 0000 192 C0 À 1100 0000 Byte XOR (1 SHL 7); toggle bit 8 (0111 0000) Component: a binary function that performs a
01 01 0000 0001 65 41 A 0100 0001 129 81 1000 0001 193 C1 Á 1100 0001 IF Bite AND (1 SHL 4) <> 0 ... test if bit 5 set predefined function (edit control,
02 02 0000 0010 66 42 B 0100 0010 130 82 1000 0010 194 C2 Â 1100 0010 list box, etc.).
03 03 0000 0011 67 43 C 0100 0011 131 83 1000 0011 195 C3 Ã 1100 0011 [Byte: 1111 0000 Mask Order: 8421 8421] Event Handler: code invoked as a result of an
04 04 0000 0100 68 44 D 0100 0100 132 84 1000 0100 196 C4 Ä 1100 0100 Byte OR $01; set bit 1 (1111 0001) event.
05 05 0000 0101 69 45 E 0100 0101 133 85 1000 0101 197 C5 Å 1100 0101 Byte AND (NOT $20); zero bit 6 (1101 0000) Events: occur when a user interacts with a
06 06 0000 0110 70 46 F 0100 0110 134 86 1000 0110 198 C6 Æ 1100 0110 Byte XOR $80; toggle bit 8 (0111 0000) component (OnEnter, OnExit, etc.).
07 07 BE 0000 0111 71 47 G 0100 0111 135 87 1000 0111 199 C7 Ç 1100 0111 IF Bite AND $10 <> 0 ... test if bit 5 set Function: a section of code that performs some
08 08 BK 0000 1000 72 48 H 0100 1000 136 88 1000 1000 200 C8 È 1100 1000 task and returns a value.
09 09 TAB 0000 1001 73 49 I 0100 1001 137 89 1000 1001 201 C9 É 1100 1001 For/While/Case Instructions:
for I := 0 to 9 do begin... Method: a Procedure or Function that is a
10 0A LF 0000 1010 74 4A J 0100 1010 138 8A 1000 1010 202 CA Ê 1100 1010 member of a class.
11 0B VT 0000 1011 75 4B K 0100 1011 139 8B 1000 1011 203 CB Ë 1100 1011 for I := 9 downto 1 do begin...
while I < 100 do begin... Object: a binary portion of a program that
12 0C FF 0000 1100 76 4C L 0100 1100 140 8C 1000 1100 204 CC Ì 1100 1100 performs a specific programming task.
13 0D CR 0000 1101 77 4D M 0100 1101 141 8D 1000 1101 205 CD Í 1100 1101 case ANumber of 1 : do this...; 2 : begin...end;
case AString of 'a', 'c'..'z' : do this...; Object Pascal: Borland modified Pascal language
14 0E 0000 1110 78 4E N 0100 1110 142 8E 1000 1110 206 CE Î 1100 1110 that extended Pascal, creating a
15 0F 0000 1111 79 4F O 0100 1111 143 8F 1000 1111 207 CF Ï 1100 1111 Messages: new language.
16 10 0001 0000 80 50 P 0101 0000 144 90 1001 0000 208 D0 Ð 1101 0000 MessageBox(0, '<text>',pchar('<title>'),<mb+mb>) Parameter: a value passed to a Procedure
17 11 0001 0001 81 51 Q 0100 0001 145 91 1001 0001 209 D1 Ñ 1101 0001 mbButton: mb_OK mb_OKCancel mb_AbortRetryIgnore or Function.
18 12 0001 0010 82 52 R 0101 0010 146 92 1001 0010 210 D2 Ò 1101 0010 mb_YesNo mb_RetryCancel mb_YesNoCancel Pointer: a variable that holds the address of
19 13 0001 0011 83 53 S 0101 0011 147 93 1001 0011 211 D3 Ó 1101 0011 mbBitmap: mb_IconExclamation mb_IconQuestion another variable.
20 14 0001 0100 84 54 T 0101 0100 148 94 1001 0100 212 D4 Ô 1101 0100 mb_IconInformation mb_IconError Procedure: a section of code that performs some
21 15 0001 0101 85 55 U 0101 0101 149 95 1001 0101 213 D5 Õ 1101 0101 mbDefaultButton: mb_DefButton1..mb_DefButton4 task but does not returns a value.
22 16 0001 0110 86 56 V 0101 0110 150 96 1001 0110 214 D6 Ö 1101 0110 mbModality: mb_ApplModal mb_SystemModal Properties: control how a component operates
23 17 0001 0111 87 57 W 0101 0111 151 97 1001 0111 215 D7 × 1101 0111 mb_TaskModal (color, width, etc.).
24 18 0001 1000 88 58 X 0101 1000 152 98 1001 1000 216 D8 Ø 1101 1000 mbSpecial: mb_Default_DeskTop_Only mb_TopMost Unit: a text file of Delphi code that is
25 19 0001 1001 89 59 Y 0101 1001 153 99 1001 1001 217 D9 Ù 1101 1001 mb_Right mb_SetForeground mb_Help compiled into machine code.
26 1A EOF 0001 1010 90 5A Z 0101 1010 154 9A 1001 1010 218 DA Ú 1101 1010 idReturnValues: idOK idCancel idYes idNo Uses List: a list of external units referenced
27 1B ESC 0001 1011 91 5B [ 0101 1011 155 9B 1001 1011 219 DB Û 1101 1011 idAbort idIgnore idRetry by a Unit.
28 1C 0001 1100 92 5C \ 0101 1100 156 9C 1001 1100 220 DC Ü 1101 1100
29 1D 0001 1101 93 5D ] 0101 1101 157 9D 1001 1101 221 DD Ý 1101 1101 MessageDlg('<text>', <mt>, [<mb>, <mb>], 0) Compiler Directives:
30 1E 0001 1110 94 5E ^ 0101 1110 158 9E 1001 1110 222 DE Þ 1101 1110 mtBitmap: mtWarning mtError mtInformation {$DEFINE $name} set to True
31 1F 0001 1111 95 5F _ 0101 1111 159 9F 1001 1111 223 DF ß 1101 1111 mtConfirmation mtCustom {$UNDEF $name} set to False
32 20 SP 0010 0000 96 60 ` 0110 0000 160 A0 1010 0000 224 E0 à 1110 0000 mbButtonText: mbOK mbCancel mbYes mbNo mbAll {$IF $name} ... {$ELSE} ... {$ENDIF}
33 21 ! 0010 0001 97 61 a 0110 0001 161 A1 ¡ 1010 0001 225 E1 á 1110 0001 mbAbort mbRetry mbIgnore mbHelp
34 22 " 0010 0010 98 62 b 0110 0010 162 A2 ¢ 1010 0010 226 E2 â 1110 0010 mrReturnValues: mrNone mrOk mrCancel mrRetry {$DEFINE anyname}
35 23 # 0010 0011 99 63 c 0110 0011 163 A3 £ 1010 0011 227 E3 ã 1110 0011 mrYes mrNo mrIgnore mrAbort mrAll {$IFDEF anyname} ... {$ENDIF}
36 24 $ 0010 0100 100 64 d 0110 0100 164 A4 ¤ 1010 0100 228 E4 ä 1110 0100
37 25 % 0010 0101 101 65 e 0110 0101 165 A5 ¥ 1010 0101 229 E5 å 1110 0101 InputBox('<caption>', '<text>', '<default str>') Standard Conditional Symbols:
38 26 & 0010 0110 102 66 f 0110 0110 166 A6 ¦ 1010 0110 230 E6 æ 1110 0110 {$DEFINE Debug} {$IFDEF Debug}
39 27 ' 0010 0111 103 67 g 0110 0111 167 A7 § 1010 0111 231 E7 ç 1110 0111 ShowMessage('<text>', + #13 + '<text>') {$DEFINE WIN32} {$IFDEF WIN32}
40 28 ( 0010 1000 104 68 h 0110 1000 168 A8 ¨ 1010 1000 232 E8 è 1110 1000 {$DEFINE VER120} {$IFDEF VER120}
Non−Standard Colors: {$DEFINE CPU386} {$IFDEF CPU386}
41 29 ) 0010 1001 105 69 i 0110 1001 169 A9 © 1010 1001 233 E9 é 1110 1001 BlueGreen = $CCCC00 LtPurple = $FBA29D
42 2A * 0010 1010 106 6A j 0110 1010 170 AA ª 1010 1010 234 EA ê 1110 1010 {$DEFINE CONSOLE} {$IFDEF CONSOLE}
Brick = $003399 LtPurple = $FFCCCC
43 2B + 0010 1011 107 6B k 0110 1011 171 AB « 1010 1011 235 EB ë 1110 1011 Brown = $006699 LtViolet = $FFCCFF
44 2C , 0010 1100 108 6C l 0110 1100 172 AC ¬ 1010 1100 236 EC ì 1110 1100 (¹default OFF) {$MAXSTACKSIZE num}
Brown = $6058A0 MediumGray = $A4A0A0 {$ALIGN} {$MINENUMSIZE 1}
45 2D − 0010 1101 109 6D m 0110 1101 173 AD 1010 1101 237 ED í 1110 1101 BurntSienna = $000088 MoneyGreen = $C0DCC0
46 2E . 0010 1110 110 6E n 0110 1110 174 AE ® 1010 1110 238 EE î 1110 1110 {$APPTYPE} {$MINSTACKSIZE num}
Butterfly = $EF10B8 Mustard = $00C4C4 {$ASSERTIONS} {$OPENSTRINGS}
47 2F / 0010 1111 111 6F o 0110 1111 175 AF ¯ 1010 1111 239 EF ï 1110 1111 Cosmo = $C802F2 NavalBlue = $CC9933
48 30 0 0011 0000 112 70 p 0111 0000 176 B0 ° 1011 0000 240 F0 ð 1111 0000 {$BOOLEVAL}¹ {$OPTIMIZATION}
Cream = $F0FBFF OliveGreen = $009966 {$DEBUGINFO} {$OVERFLOWCHECKS}¹
49 31 1 0011 0001 113 71 q 0111 0001 177 B1 ± 1011 0001 241 F1 ñ 1111 0001 DkBlue = $770000 Orange = $33CCFF
50 32 2 0011 0010 114 72 r 0111 0010 178 B2 ² 1011 0010 242 F2 ò 1111 0010 {$DEFINITIINFO} {$R filename.RES}
DkGreen = $005500 PaleBlue = $FFFFCC {$DESCRIPTION '..'} {$RANGECHECKS}¹
51 33 3 0011 0011 115 73 s 0111 0011 179 B3 ³ 1011 0011 243 F3 ó 1111 0011 DkOrange = $0099CC PaleGreen = $79FF91
52 34 4 0011 0100 116 74 t 0111 0100 180 B4 ´ 1011 0100 244 F4 ô 1111 0100 {$E extension} {$REALCOMPATIBILITY}¹
DkPurple = $AE0D3E PaleYellow = $CCFFFF {$EXTENDEDSYNTAX} {$SAFEDIVIDE}¹
53 35 5 0011 0101 117 75 u 0111 0101 181 B5 µ 1011 0101 245 F5 õ 1111 0101 DkRose = $9966FF PaleYellow = $E2FCFB
54 36 6 0011 0110 118 76 v 0111 0110 182 B6 ¶ 1011 0110 246 F6 ö 1111 0110 {$HINTS} {$STACKFRAMES}¹
DkTeal = $999933 Peach = $647EF9 {$IMAGEBASE number} {$TYPEDADDRESS}¹
55 37 7 0011 0111 119 77 w 0111 0111 183 B7 · 1011 0111 247 F7 ÷ 1111 0111 DkViolet = $993399 Pink = $8640FB
56 38 8 0011 1000 120 78 x 0111 1000 184 B8 ¸ 1011 1000 248 F8 ø 1111 1000 {$INCLUDE filename} {$TYPEINFO}¹
Editor = $950416 Pumpkin = $0099FF {$IOCHECKS} {$VARSTRINGCHECKS}
57 39 9 0011 1001 121 79 y 0111 1001 185 B9 ¹ 1011 1001 249 F9 ù 1111 1001 Grape = $B16778 Purple = $CC0099
58 3A : 0011 1010 122 7A z 0111 1010 186 BA º 1011 1010 250 FA ú 1111 1010 {$LINK filename} {$WARNINGS}
Green = $2BCA56 RedBaron = $0033FF {$LOCALSYMBOLS} {$WEAKPACKAGEUNIT}¹
59 3B ; 0011 1011 123 7B { 0111 1011 187 BB » 1011 1011 251 FB û 1111 1011 Honey = $1CAEE6 Rose = $5E24F4
60 3C < 0011 1100 124 7C | 0111 1100 188 BC ¼ 1011 1100 252 FC ü 1111 1100 {$LONGSTRINGS} {$WRITEABLECONST}
Khaki = $669999 Sea = $B90F0B
61 3D = 0011 1101 125 7D } 0111 1101 189 BD ½ 1011 1101 253 FD ý 1111 1101 LtBlue = $FFCC99 SeaGreen = $CCFF00 User:
62 3E > 0011 1110 126 7E ~ 0111 1110 190 BE 1011 1110 254 FE þ 1111 1110 LtBrown = $688FB0 Sky = $FD8A4D
63 3F ? 0011 1111 127 7F 0111 1111 191 BF ¿ 1011 1111 255 FF ÿ 1111 1111 LtCyan = $FFFF99 SkyBlue = $F0CAA6
(Fn:Courier) (BE:Bell BK:BackSpace TAB:Tab (Fn:Courier) LtGrape = $BD85C7 Slab = $B3B67E
LF:LineFeed VT:VerticalTab FF:FormFeed v7.20 LtGreen = $CCFFCC Violet = $FF33FF
CR:CarriageReturn EOF:EndOfFile ESC:Escape LtOrange = $99CCFF YellowGreen = $00FFCC
SP:space [#13#10:LineBreak])

You might also like