Ok, ich versuch das jetzt mit Records. Ein Record scheint ja einfach nur den Variablennamen mit einem T davor als Datentyp zu haben. Ich hab das global so Deklariert
Delphi-Quellcode:
var
VocabLanguage: TVocabLanguage;
Compiler meckert aber. "Undeclared identifier" Wie muss ich es denn richtig machen?
Delphi-Quellcode:
procedure TForm2.FormCreate(Sender: TObject);
var
i: Integer;
begin
Vocabulary:= TStringList.Create;
Vocabulary.LoadFromFile('Vocabulary.txt');
RandomNumber:= random(Vocabulary.Count);
L_RemainingWords.Caption:= 'Verbleibende Vokabeln: '+IntToStr(Vocabulary.Count);
If GermanEnglish
Then
try
L_HeadingTrainerDescription.Caption:= 'Deutsch -> Englisch | '+IntToStr(Repititions)+' Wiederholungen | 10 Vokabeln';
for i:= 0 to Vocabulary.Count - 1 do
Begin
VocabLanguage = record
VocabLanguage:= TVocabLanguage.Create;
VocabLanguage.English:= Vocabulary.Names[i]
VocabLanguage.German:= Vocabulary.ValueFromIndex[i]
VocabLanguage.SolvedCount:= 0;
L_UnknownWord.Caption:= VocabLanguage.English[RandomNumber];
L_CorrectAnswer.Caption:= '';
End;
finally
end