Вниз
Скачать: CL | DM;

Как получить значение выделенной строки в ListBox?   Найти похожие ветки 

← →
Artemij   (2003-06-11 13:04) [0]

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


← →
clickmaker ©   (2003-06-11 13:09) [1]

ListBox.Text
ListBox.Items[ListBox.ItemIndex]


← →
andrey_pst ©   (2003-06-11 13:24) [2]

unit Unit1;

interface

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
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

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;

end.


← →
Artemij ©   (2003-06-11 13:35) [3]

Оболденное спасибо! С этой минуты я обожаю сайт www.delphimaster.ru!


← →
Palladin ©   (2003-06-11 13:41) [4]

Я бы на твоем месте справку бы обожал побольше, не надейся что сможешь получить тут ответ на все вопросы...


← →
Ig   (2003-06-12 20:32) [5]

Palladin
Подскажи какую имеменно "справку" Ты имеешь ввиду, если справку в Delphi, то допустим если это Delphi 6,7 ? , там справочная система на английском языке!?!
:(


← →
Palladin ©   (2003-06-12 20:59) [6]


> <Ig> (12.06.03 20:32)

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


← →
Ghost ©   (2003-06-13 08:42) [7]

> Palladin

:)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.016 c
3-83959
kanat
2003-05-29 13:15
2003.06.26
Dbase как работать с NTX


3-83929
AlexA
2003-05-30 12:06
2003.06.26
Как программным способом изменить ширину MEMO в FastReporte.


11-84065
blackalex
2002-10-02 11:36
2003.06.26
В динамически созданныx меню не работает OnClick


3-83853
explorer
2003-05-28 13:16
2003.06.26
Обработка ошибки хранимой процедуры


4-84853
EK
2003-04-26 22:08
2003.06.26
Полупрозрачность




   Наверх