Thema: Delphi TStringList

Einzelnen Beitrag anzeigen

oki

Registriert seit: 30. Dez 2002
Ort: Brandshagen
1.819 Beiträge
 
Delphi 2007 Professional
 
#10

Re: TStringList

  Alt 19. Aug 2003, 07:30
Hi,

tritt der Fehler beim Click auf Button1 oder Button2 auf?

Bau in den Code für Button2 mal folgende Sicherheitsabfrage ein:

Delphi-Quellcode:

TForm1.Button2Click(Sender:TObject);
begin
  IF not Assigned(Form2) then begin
    ShowMessage('kein Fenster');
    Exit;
  end;
  IF Form2.Liste.Count = 0 then
    ShowMessage('Liste leer')
  else
    ShowMessage('Letzter Listeneintrag:'+Form2.Liste[Liste.Count-1));
end;
Gruß oki
  Mit Zitat antworten Zitat