| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
StringGrid+DateTimePicker
Vinum © (2008-05-14 15:50:00)Здравствуйте, начать обсуждение я решил с форума для начинающих
http://www.delphimaster.ru/cgi-bin/forum.pl?id=1210761565&n=18
и проблема: у TKOLStGrd нет события OnChangeTopLeft. Каким образом мне поступить?
(2009-04-10 13:50:00) [1]Удалено модератором
Vinum (2008-05-15 16:42:00) [2]Спасибо, счастлив
Дмитрий К (2008-05-15 16:12:00) [3]Unit1_1.inc не трогай - он автоматически регенерируется. Назначь обработчик в FormCreate:
procedure TForm1.KOLForm1FormCreate(Sender: PObj);
begin
StGrd1.OnScroll := StGrd1OnScroll;
end;
Vinum (2008-05-15 15:48:00) [4]Научите пожалуйста правильно писать процедуры, которых нет в Eventах.
Я счас пишу так:
В месте описания процедур :
Procedure StGrd1OnScroll(Sender:Pcontrol; Bar:TscrollerBar; Scrollcmd:Cardinal;
ThumbPos:Cardinal);
В самой программе:
Procedure TForm1.StGrd1OnScroll(Sender:Pcontrol; Bar:TscrollerBar; Scrollcmd:Cardinal; ThumbPos:Cardinal);
Begin
//тут код
end;
В Unit1_1.inc:
Result.StGrd1.Onscroll:=Result.StGrd1OnScroll;
Все работает, но при добавления на форму какого-нить контрола или изменении свойств в инспекторе, строчка Result.StGrd1.Onscroll:=Result.StGrd1OnScroll; пропадает. Как мне сделать чтоб не пропадала?
Дмитрий К (2008-05-14 19:23:00) [5]Обрабатывай OnScroll
| |
