Feuerkelch
Grünschnabel
Hallo Leutz,
ich hab nen Problem mit meinem Delphi-Programm...
Ich soll für die Schule ein Memory Programmieren und hab einige Ideen, das Script zu vereinfachen, aber ich kenne nicht die richtigen Befehle...
Was ich brauche ist eine Funktion wie IntToStr nur halt um Strings in TObjects zu verwandeln... ich will nämlich z.B. den visible-Wert in arrays Speichern. Wenn die Form erstellt wird, sollen dann mit einer FOR-Schleife alle Felder sichtbart gemacht werden. Gedacht hab ich mir das so:
feld00 ist mein erstes Feld ganz unten links in der Ecke. Das geht dann wie im Koordinatensystem durch das ganze Spielfaled nach oben rechts zu feld43...
Ich hoffe es ist ersichtlich geworden, was ich möchte...
ich hab nen Problem mit meinem Delphi-Programm...
Ich soll für die Schule ein Memory Programmieren und hab einige Ideen, das Script zu vereinfachen, aber ich kenne nicht die richtigen Befehle...
Was ich brauche ist eine Funktion wie IntToStr nur halt um Strings in TObjects zu verwandeln... ich will nämlich z.B. den visible-Wert in arrays Speichern. Wenn die Form erstellt wird, sollen dann mit einer FOR-Schleife alle Felder sichtbart gemacht werden. Gedacht hab ich mir das so:
Code:
var
i,j: Integer;
cardvisible: array[0..4] of array[0..3] od Boolean;
procedure TForm1.FormCreate(Sender: TObject)
begin
for i:=0 to 4 do // die Horizontale des Spielfeldes
begin
for j:=0 to 3 do // die Vertikale des Spielfeldes
begin
StringToTObject('feld'+inttostr(i)+inttostr(j))+'.visible') := cardvisible[i,j];
// StringToObject ist der Befehl, den ich gern in der Form hätte,
// aber nicht kenne...
end;
end;
end;
feld00 ist mein erstes Feld ganz unten links in der Ecke. Das geht dann wie im Koordinatensystem durch das ganze Spielfaled nach oben rechts zu feld43...
Ich hoffe es ist ersichtlich geworden, was ich möchte...