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

Вниз

Назначение обработчика в Run Time   Найти похожие ветки 

 
b-Ars   (2002-09-27 16:39) [0]

Господа, я пытаюсь назначить полю из БД обработчик OnSetText в RunTime. Там 2 параметра: 1 - Поле(Sender: TField), 2 - const Text:String. Пожалуйста покажите как конкретно назначить сию процедуру полю, т.е. что нужно передавать 2-м параметром. Спасибо.


 
sniknik   (2002-09-27 16:47) [1]

назначь в десигн-тайме щелчком мыши по нему и посмотри.


 
Best Before 2024   (2002-09-27 16:49) [2]

TMyForm = class(...)
private
public
procedure MyOnSetText(Sender: TField; const Text: String);
end;

procedure TMyForm.OnCreateForm(...)
begin
MyField.OnSetText := MyOnSetText;
end;

procedure TMyForm.MyOnSetText(Sender: TField; const Text: String);
begin
...
end;


 
B-Ars   (2002-09-27 16:50) [3]

Да нет, проблема-то не в этом. Что писать в Query1.Fields.FieldByName("Field1").OnSetText:=MyOnSetText(????????????????)<-вот тутова, первый параметр поле, а вторым-то что, код напишите плиз.


 
B-Ars   (2002-09-27 16:52) [4]

О, Йес, Best Before 2024, спасибо, благодарю, пардон за ламерство


 
Anatoly Podgoretsky   (2002-09-27 16:53) [5]

В данный обрабочик ничего не надо передавать, это не твоя задача, это бкднт делать твой компонент TFieldXXX



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

Форум: "Базы";
Текущий архив: 2002.10.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.008 c
14-68936
Ricks
2002-09-20 17:30
2002.10.21
Warcraft III


3-68664
BJValentine
2002-09-27 19:33
2002.10.21
Украинские символы в dbf


4-69056
Polevi
2002-09-06 14:38
2002.10.21
наследование OVERLAPPED


1-68689
AL2002
2002-10-10 19:39
2002.10.21
Сколько будет? В строке.


14-68950
cok
2002-09-22 11:12
2002.10.21
Я вернулся





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский