Computername aus ListBox

[-homer-]

hi,

kann mir einer sagen, wieich aus einer listBox einen Computernamen herausfiltern kann??? Ich drücke auf einen Button:

Delphi-Quellcode:

ListBox1.items.add(Ecomputername.text);

jetzt ist der Name meines Computernamen drinnen, doch wie kann ich das denn rückgänging machen.
Für mein 'net send' benutze ich diesen Code:

Delphi-Quellcode:

procedure TForm1.Senden; 
var Send: string; 
begin 
  Send := 'send ' + User.Text + ' ' + Nachricht.Text; 
  ShellExecute(GetDesktopWindow, 'open', 'net.exe', PChar(Send), nil, SW_HIDE); 
end;

Statt diesem Befehl 'User.text' will ich jetzt das ausgewählte item aus meiner ListBox einfügen. ich hab es schon mit allem möglichen versucht. Hat aber nicht geklappt. könnt ihr mir da hefen.



-homer-

[thomasdrewermann]

Hi -Homer-,

den Text des gerade ausgewählten Eintrages in einer Listbox bekommst du in dem du zuerst die Listbox fragst, welches Item gerade markiert ist. Diese Eigenschaft der Listbox nennt sich ItemIndex. Wenn du jetzt die Markierte Position innerhalb der Listbox hast, dann kannst du dir den Text aus der Position besorgen.

Also ist das die Anfrage, welche dir den Text, des markierten Elements zurückliefert:

Delphi-Quellcode:

listbox1.Items.Strings[listbox1.ItemIndex]

In deinen Sourcecode eingebaut:

Delphi-Quellcode:

procedure TForm1.Senden; 
var Send: string; 
begin 
  Send := 'send ' + listbox1.Items.Strings[listbox1.ItemIndex] + ' ' + Nachricht.Text; 
  ShellExecute(GetDesktopWindow, 'open', 'net.exe', PChar(Send), nil, SW_HIDE); 
end;

mfg
thomas

[-homer-]

Danke, war genau das richtige :mrgreen:


-homer-