[Back to STRINGS SWAG index] [Back to Main SWAG index] [Original]
UNIT HTstr;
{ Complete set of defined string types.
Part of the Heartware Toolkit v2.00 (HTstr.PAS) for Turbo Pascal.
Author: Jose Almeida. P.O.Box 4185. 1504 Lisboa Codex. Portugal.
I can also be reached at RIME network, site ->TIB or #5314.
Feel completely free to use this source code in any way you want, and, if
you do, please don't forget to mention my name, and, give me and Swag the
proper credits. }
INTERFACE
type
String1 = string[1];
String2 = string[2];
String3 = string[3];
String4 = string[4];
String5 = string[5];
String6 = string[6];
String7 = string[7];
String8 = string[8];
String9 = string[9];
String10 = string[10];
String11 = string[11];
String12 = string[12];
String13 = string[13];
String14 = string[14];
String15 = string[15];
String16 = string[16];
String17 = string[17];
String18 = string[18];
String19 = string[19];
String20 = string[20];
String21 = string[21];
String22 = string[22];
String23 = string[23];
String24 = string[24];
String25 = string[25];
String26 = string[26];
String27 = string[27];
String28 = string[28];
String29 = string[29];
String30 = string[30];
String31 = string[31];
String32 = string[32];
String33 = string[33];
String34 = string[34];
String35 = string[35];
String36 = string[36];
String37 = string[37];
String38 = string[38];
String39 = string[39];
String40 = string[40];
String41 = string[41];
String42 = string[42];
String43 = string[43];
String44 = string[44];
String45 = string[45];
String46 = string[46];
String47 = string[47];
String48 = string[48];
String49 = string[49];
String50 = string[50];
String51 = string[51];
String52 = string[52];
String53 = string[53];
String54 = string[54];
String55 = string[55];
String56 = string[56];
String57 = string[57];
String58 = string[58];
String59 = string[59];
String60 = string[60];
String61 = string[61];
String62 = string[62];
String63 = string[63];
String64 = string[64];
String65 = string[65];
String66 = string[66];
String67 = string[67];
String68 = string[68];
String69 = string[69];
String70 = string[70];
String71 = string[71];
String72 = string[72];
String73 = string[73];
String74 = string[74];
String75 = string[75];
String76 = string[76];
String77 = string[77];
String78 = string[78];
String79 = string[79];
String80 = string[80];
String81 = string[81];
String82 = string[82];
String83 = string[83];
String84 = string[84];
String85 = string[85];
String86 = string[86];
String87 = string[87];
String88 = string[88];
String89 = string[89];
String90 = string[90];
String91 = string[91];
String92 = string[92];
String93 = string[93];
String94 = string[94];
String95 = string[95];
String96 = string[96];
String97 = string[97];
String98 = string[98];
String99 = string[99];
String100 = string[100];
String101 = string[101];
String102 = string[102];
String103 = string[103];
String104 = string[104];
String105 = string[105];
String106 = string[106];
String107 = string[107];
String108 = string[108];
String109 = string[109];
String110 = string[110];
String111 = string[111];
String112 = string[112];
String113 = string[113];
String114 = string[114];
String115 = string[115];
String116 = string[116];
String117 = string[117];
String118 = string[118];
String119 = string[119];
String120 = string[120];
String121 = string[121];
String122 = string[122];
String123 = string[123];
String124 = string[124];
String125 = string[125];
String126 = string[126];
String127 = string[127];
String128 = string[128];
String129 = string[129];
String130 = string[130];
String131 = string[131];
String132 = string[132];
String133 = string[133];
String134 = string[134];
String135 = string[135];
String136 = string[136];
String137 = string[137];
String138 = string[138];
String139 = string[139];
String140 = string[140];
String141 = string[141];
String142 = string[142];
String143 = string[143];
String144 = string[144];
String145 = string[145];
String146 = string[146];
String147 = string[147];
String148 = string[148];
String149 = string[149];
String150 = string[150];
String151 = string[151];
String152 = string[152];
String153 = string[153];
String154 = string[154];
String155 = string[155];
String156 = string[156];
String157 = string[157];
String158 = string[158];
String159 = string[159];
String160 = string[160];
String161 = string[161];
String162 = string[162];
String163 = string[163];
String164 = string[164];
String165 = string[165];
String166 = string[166];
String167 = string[167];
String168 = string[168];
String169 = string[169];
String170 = string[170];
String171 = string[171];
String172 = string[172];
String173 = string[173];
String174 = string[174];
String175 = string[175];
String176 = string[176];
String177 = string[177];
String178 = string[178];
String179 = string[179];
String180 = string[180];
String191 = string[191];
String192 = string[192];
String193 = string[193];
String194 = string[194];
String195 = string[195];
String196 = string[196];
String197 = string[197];
String198 = string[198];
String199 = string[199];
String200 = string[200];
String201 = string[201];
String202 = string[202];
String203 = string[203];
String204 = string[204];
String205 = string[205];
String206 = string[206];
String207 = string[207];
String208 = string[208];
String209 = string[209];
String210 = string[210];
String211 = string[211];
String212 = string[212];
String213 = string[213];
String214 = string[214];
String215 = string[215];
String216 = string[216];
String217 = string[217];
String218 = string[218];
String219 = string[219];
String220 = string[220];
String221 = string[221];
String222 = string[222];
String223 = string[223];
String224 = string[224];
String225 = string[225];
String226 = string[226];
String227 = string[227];
String228 = string[228];
String229 = string[229];
String230 = string[230];
String231 = string[231];
String232 = string[232];
String233 = string[233];
String234 = string[234];
String235 = string[235];
String236 = string[236];
String237 = string[237];
String238 = string[238];
String239 = string[239];
String240 = string[240];
String241 = string[241];
String242 = string[242];
String243 = string[243];
String244 = string[244];
String245 = string[245];
String246 = string[246];
String247 = string[247];
String248 = string[248];
String249 = string[249];
String250 = string[250];
String251 = string[251];
String252 = string[252];
String253 = string[253];
String254 = string[254];
String255 = string[255];
IMPLEMENTATION
END. { HTstr.PAS }
[Back to STRINGS SWAG index] [Back to Main SWAG index] [Original]