Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Вниз

работа с combobox   Найти похожие ветки 

 
Ильдарик_13   (2010-05-14 14:23) [0]

Здравствуйте! У меня следующая проблема: неи знаю, как обратиться к выбранному элементу из списка combobox! Попробовал через свойство Text, не получается! Та же проблема с Edit, не считывается значение из него!! Вот нашел в инете код procedure TForm2.Button6Click(Sender: TObject);
var ffield, fvalue: string;
opts : TLocateOptions;
begin
ffield := TForm2.ComboBox1.Text;
fvalue := TForm2.Edit1.Text;

opts := [loCaseInsensitive];
 AdoTable1.Locate(ffield, fvalue, opts);
if not AdoTable1.Locate(ffield, fvalue, opts) then
ShowMessage(fvalue + " not found in " + ffield);
end;
В выделенных строчках выдает ошибку


 
Palladin ©   (2010-05-14 14:24) [1]

вот ты TForm2 зачем написал?


 
Ega23 ©   (2010-05-14 14:25) [2]

ffield := TForm2.ComboBox1.Text;
fvalue := TForm2.Edit1.Text;


TForm2. убери


 
Andy BitOff ©   (2010-05-14 14:26) [3]


> Ega23 ©   (14.05.10 14:25) [2]

Думаешь поможет? Ну, конкретно, в этом случае да, а в целом?


 
Ильдарик_13   (2010-05-14 14:27) [4]

Понял, да я в Delphi недавно работаю)))


 
Palladin ©   (2010-05-14 14:28) [5]

Что ты понял?


 
Palladin ©   (2010-05-14 14:29) [6]

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


 
Ильдарик_13   (2010-05-14 14:29) [7]

Спасибо ребята, работает!!



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

Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.063 c
15-1270569642
HRustBB
2010-04-06 20:00
2010.08.27
Не нарушу ли я авторские права компании Borland если...


2-1265380693
Loki3d
2010-02-05 17:38
2010.08.27
Возврат переменной


15-1264109427
Юрий
2010-01-22 00:30
2010.08.27
С днем рождения ! 22 января 2010 пятница


15-1275405572
AKE
2010-06-01 19:19
2010.08.27
Кто-нибудь пользовал браузер Fine Browser?


2-1269236624
pro_xaoc
2010-03-22 08:43
2010.08.27
Постоянно выскакивает ошибка





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский