Benutze zwei StringLists. In der einen stehen die deutschen Vokabeln in der anderen die
englischen.
In DVok.Strings[X] steht dann die deutsche, und in
EVok.Strings[X] die englische.
Du musst dann prüfen ob DVok.Strings[X] = EVok.Strings[X].
In FormCreate musst du einfach
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11:
| procedure TForm1.FormCreate(Sender: TObject); begin DVok := TStringList.Create; EVok := TStringList.Create; DVok.Add('erste deutsche Vokabel'); EVok.Add('erste englische Vokabel');
DVok.Add('zweite deutsche'); DVok.Add('zweite englische'); end; |
eingeben.