Einzelnen Beitrag anzeigen

kingflo

Registriert seit: 21. Jun 2004
Ort: Hamburg
502 Beiträge
 
Delphi 7 Professional
 
#1

Items einer CheckListBox mit Strings eines Memos abgleichen

  Alt 2. Okt 2005, 12:48
Hallo erstmal...

Ich bräuchte leider etwas hilfe. Ich möchte gerne die prüfen, welche strings in Memo4 stehen, und wenn ein String von memo4 auch als Item in einer ChecklistBox existiert, dann soll dieses Item auf checked gesetzt werden.
Aber ich bekomme das Irgendwie net so hin.
Ich habe schon tausend mal meine Schleifen um strukturiert aber es klappt nicht.
der letzte Versuch sah so aus.
Code:
 i:=0; y:=0;
 while i<=AssoBox.Items.Count-1 do
 begin

  while y <=memo4.Lines.Count-1  do
  begin
    if AssoBox.Items.Strings[i]=memo4.Lines.Strings[y] then
    assoBox.Checked[i]:=true;
    y:=y+1;
  end;

  i:=i+1;
 end;
Florian Gilde
  Mit Zitat antworten Zitat