Forum: Programmieren allgemein
by davtix,
3. Nov 2013
is ja richtig nützlich so n array ;):)
type
TMyArray = array of string;
TMyArray2 = array of tpicture;
var
i :integer; a : TMyArray; a2 : TMyArray2;
a:=('pic1');
Forum: Programmieren allgemein
by davtix,
3. Nov 2013
okay habs rausgefunden ;)
s:= edit2.Text;
for i := 1 to 100 do
begin
if a = s then begin
label6.Caption:= ('gefunden');
Forum: Programmieren allgemein
by davtix,
3. Nov 2013
hi und guten morgen :)
ich bin mal dabei mich mit array´s zu beschäftigen, um mal zu sehen wie es funktioniert.
derzeit bin ich noch bei statischen arrays um es zu begreifen.
soweit (oder kurz) bin ich jetzt...
procedure TForm1.Button1Click(Sender: TObject);
type
PMyArray = ^TMyArray;