Forum: Object-Pascal / Delphi-Language
FreePascal
by Gunny,
18. Dez 2012
Mit dem Array funktionierts nach kurzem Umbau.
procedure TForm1.Round_1_CreateClick(Sender: TObject);
var
i, j : Integer;
p : array of string; //steht eigentlich in der globalen var
begin
num_players := Form1.Playerlist.Items.Count; //Items.Count fängt bei 1 an
for i := 1 to num_players do
Forum: Object-Pascal / Delphi-Language
FreePascal
by Gunny,
18. Dez 2012
Hallo,
ich bin neu hier und bin mir gerade nicht sicher, ob das Thema hierhin gehört.
Ich programmiere in Lazarus v1.0.4
Ich habe eine Listbox mit bis zu 64 Einträgen und für die Verarbeitung möchte ich jetzt jedem Indexplatz einer Variablen zuweisen.
procedure TForm1.Round_1_CreateClick(Sender: TObject);
var
p1, p2, p3, ......, p64 : String;