Як отримати значення виділеної рядки в listbox

Як отримати значення виділеної рядки в ListBox?

Допоможіть, будь ласка, починаючому програмістів! Ніяк не можу добитися, щоб виділена рядок в ListBox відображалася, скажімо в Edit1. З бази даних (Paradox) я переношу інфо певного стовпця в ListBox, а потім, при виділенні якого-небудь рядка, хочу використовувати її значення в іншому місці. Може ListBox і не підходить для такої манінуляціі? Заздалегідь дякую.

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class (TForm)
ListBox1: TListBox;
Edit1: TEdit;
procedure FormCreate (Sender: TObject);
procedure ListBox1Click (Sender: TObject);
private

public

end;

var
Form1: TForm1;

procedure TForm1.FormCreate (Sender: TObject);
begin
ListBox1.Items.Add ( "Іван Петров");
ListBox1.Items.Add ( "Вася Пупкін");
end;

procedure TForm1.ListBox1Click (Sender: TObject);
begin
Edit1.Text: = ListBox1.Items.Strings [ListBox1.ItemIndex];
end;

Оболденное спасибі! З цієї хвилини я обожнюю сайт www.delphimaster.ru!

Я б на твоєму місці довідку б обожнював побільше, не сподівайся що зможеш отримати тут відповідь на всі питання.

Palladin
Підкажи яку імеменно "довідку" Ти маєш на увазі, якщо довідку в Delphi, то допустимо якщо це Delphi 6,7. там довідкова система на англійській мові.
:(


> (12.06.03 20:32)

вибач хлопець. в такому випадку програмування не для тебе.

Схожі статті