Cita:
Empezado por moise094
El caso es el siguiente, voy a abrir un documento .txt en un listbox y este tiene:
JUAN 45
JOSE 56
y quiero que al abrir el archivo, me aparezca en un edit cualquiera el numero 45
es decir el listbox va siempre a tener varios items...
|
Entonces sería:
Código Delphi
[-]
procedure TForm1.ListBox1Click(Sender: TObject);
begin
with TListBox(Sender) do
Edit1.Text := ExtraerNum(Items[ItemIndex]);
end;
O dependiendo de lo que desees, también podrías hacer:
Código Delphi
[-]
procedure TForm1.Edit1Enter(Sender: TObject);
begin
with ListBox1 do
Edit1.Text := ExtraerNum(Items[ItemIndex]);
end;
Siendo el código de la función
ExtraerNum el que elijas.
Saludos.