Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   ListBox Einträge trennen (https://www.delphipraxis.net/103408-listbox-eintraege-trennen.html)

Larsi 15. Nov 2007 12:59


ListBox Einträge trennen
 
Hi, gibts ne möglichkeit wenn ich z.b in ner listbox als item "Name: xyz Name2: abc"
habe; das der in ein Edit dann den beliebigen Wert von Name reinschreibt und halt von Name2 den inhalt auch in ein edit reinschreibt.
also das dann in Edit1 bei diesem Beispiel xyz steht und in Edit2 abc.
das xyz und das abc bleiben aber NICHT immer das gleiche^^


MFG Lars W.

Sharky 15. Nov 2007 13:01

Re: ListBox Einträge trennen
 
Hai Lars,

Du kannst einfach den Text des ausgewählten Eintrags der Listbox mit Delphi-Referenz durchsuchenPos untersuchen und den Text mit Delphi-Referenz durchsuchenCopy herausholen.

Larsi 15. Nov 2007 13:06

Re: ListBox Einträge trennen
 
bin echt noch n anfänger kannste mir da mal n code dafür geben. vielleicht für das beispiel mit dem xyz oder so, biiiiiiiiiiiiiiiiiiiiiiiiiide?!


MFG Lars W.

bitsetter 15. Nov 2007 17:13

Re: ListBox Einträge trennen
 
Hi,

für Edit1 eine Möglichkeit:
Delphi-Quellcode:
uses
  StrUtils;
...

var
  ItemText: AnsiString;
  Start, Ende: integer;
begin
  ItemText:= 'Name: xyz Name2: abc';
  Start:= Pos(': ', ItemText)+ 2;
  Ende:= PosEx(' ', ItemText, Start)- Start;
  Edit1.Text:= Copy(ItemText, Start, Ende);
Wie du den Text in das 2. Feld kopierst, bekommst du dann bestimmt selber raus.

Larsi 15. Nov 2007 19:33

Re: ListBox Einträge trennen
 
danke hab zwa ka wie das geht aber es geht^^


MFG Lars W.

Deep-Sea 16. Nov 2007 07:26

Re: ListBox Einträge trennen
 
Zitat:

Zitat von Larsi
danke hab zwa ka wie das geht aber es geht^^

Dann hoffen wir mal, dass du das heraus finden magst und nicht einfach nur kopierst ...


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:02 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz