Подскажите как сделать чтобы в ComboBox се отбражалось одн

← →
ceval (2004-05-19 20:39) [0]

Добрый вечер всем!!
Подскажите как сделать чтобы в ComboBox"се отбражалось одно
в программе использывалось другое например:
есть таблица с полем "sisk" что бы в ComboBox"се отбражалось
названия "Код" а при поиске бралось бы значения "sisk" ??

Большое спасибо!

← →
begin...end © (2004-05-19 20:40) [1]

Хороший вопрос.

← →
Vlad © (2004-05-19 20:55) [2]

Если я правильно понял, нужно в выпадающем списке показывать одни значения, а им в соответствии хранить другие ?
Если это так, то используйте метод TStrings.AddObject, где в качестве объекта и добавляйте латинские названия.

← →
wicked © (2004-05-19 20:56) [3]

например, через св-во ItemIndex...
но при этом порядок следования значений поля "Код" должно совпадать с порядком следования значений поля "sisk"...

← →
Anatoly Podgoretsky © (2004-05-19 20:56) [4]

if A = "Код" then A := "sisk"

← →
Гаврила © (2004-05-20 01:17) [5]

Да лучше уж через Objects
правильнее это
см [2]

← →
ceval (2004-05-28 12:47) [6]

VLAD ты правельно все понял
Если не сложна как использывать метод TStrings.AddObject
или какой небудь пример
Зарания благодарин!

← →
Anatoly Podgoretsky © (2004-05-28 13:35) [7]

А пример в справке чем не устаивает, достаточно подробный?

← →
Stone777 © (2004-05-28 13:51) [8]

> if A = "Код" then A := "sisk"

А если таких записей 100? что Вы собираетесь писать?

Если сопоставлять нужно текстовые данные то вместо AddObject можно воспользоваться просто ADD
например так:
procedure TForm1.Button1Click(Sender: TObject);
var i:byte;
begin
t.Clear;
for i:=1 to 3 do begin
t.Add(s[i]);
end;
end;
Если нужно связать данные с какими-либо объектами, то
AddObject в качестве параметров передается строка и связанный с ним объект

← →
Миссяй (2004-05-28 17:18) [9]

тебе это поможет...
format c:

← →
ceval (2004-05-31 20:52) [10]

Спасибо Миссяй за нужный совет воспользуйся ты им сам
А а если по теме напишите какой небудь примерTStrings.AddObject,а то немогу разобраться
Спасибо!!!!!!

← →
ceval (2004-06-01 09:05) [11]

АУ кто-нибудь напишите пример я то не могу разобраться!!??

2ceval
type PTmp = ^TTmp TTmp = record str : string; code: string; end; ... var _p: PTmp; ... ComboBox1.Clear; New(_p); _p^.str := "Российская Федерация"; _p^.code := "RU"; ComboBox1.AddItem(_p^.str, TObject(_p)); New(_p); _p^.str := "Великобритания"; _p^.code := "GB"; ComboBox1.AddItem(_p^.str, TObject(_p)); // взять код выбранной страны ... := PTmp(ComboBox1.Items.Objects[ComboBox1.ItemIndex])^.code; // незабыть убить данные for _i := 0 to ComboBox1.Count-1 do Dispose(PTmp(ComboBox1.Items.Objects[_i]));

зы. Что-то добрый я с утра :)

Подскажите как сделать чтобы в ComboBox се отбражалось одн Найти похожие ветки