Einzelnen Beitrag anzeigen

Benutzerbild von maxmax
maxmax

Registriert seit: 21. Jun 2007
Ort: Garmisch-Partenkirchen
107 Beiträge
 
Delphi 7 Personal
 
#8

Re: neustart des eigenen programms

  Alt 30. Mär 2008, 10:14
jetzt hab ich abern och eine frage:
ich hab ein paar edits, die die ListBox1 inhalte auslesen und über die man die bestehenden inhalte der ListBox bearbeiten kann
und zwar so:
Delphi-Quellcode:
procedure TForm1.AendernClick(Sender: TObject);
begin
try
if ListBox1.ItemIndex<>-1 then
begin
ListBox1.Items.Insert(ListBox1.ItemIndex, Name.Text+' | '+Ansprechpartner.Text+' | '+Strasse.Text+' | '+Ort.Text+' | '+Telefon.Text+' | '+Telefax.Text+' | '+Mobil.Text+' | '+EMail.Text);
ListBox1.Items.Delete(ListBox1.ItemIndex);
end
else
ShowMessage ('Es müssen Einträge markiert sein!');
except
ShowMessage ('Falsche Eingaben!');
end;
end;
wenn ich nun aber diese procedure im programm aufrufe, passiert nichts! warum?
Max S.
mfg maxmax
http://www.maxxam.de