Forum: Sonstige Fragen zu Delphi
Delphi
by thiagojonas,
26. Nov 2008
Aber genau so wollte ich es haben. :-D
Forum: Sonstige Fragen zu Delphi
Delphi
by thiagojonas,
26. Nov 2008
Alle klar danke.
Für alle mit dem selben problem:
procedure TForm1.Button5Click(Sender: TObject);
var flug: string;
position:integer;
target:string;
begin
flug := '001';
Forum: Sonstige Fragen zu Delphi
Delphi
by thiagojonas,
26. Nov 2008
Okay. Dann so, stimmts?
procedure TForm1.Button5Click(Sender: TObject);
var flug: string;
position:integer;
begin
flug := '001';
Position := Pos(flug, '001 Wayne'); // "001 Wayne" steht für die ZEILE in der Listbox
if Position <> 0 then
ShowMessage('gefunden an Position: ' + IntToStr(Position))
Forum: Sonstige Fragen zu Delphi
Delphi
by thiagojonas,
26. Nov 2008
Und wie mache ich das? :oops: :-D
Forum: Sonstige Fragen zu Delphi
Delphi
by thiagojonas,
26. Nov 2008
Hallo Leute,
ich lasse zwei werte in eine zeile in eine listbox einfügen.
procedure TForm1.start_btnClick(Sender: TObject);
var flug: string;
begin
flug := '001';
Listbox.AddItem(flug + ' | ' + 'HALLO',Listbox);