Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Вызов процедуры

Автор: Waterman 3.6.2007, 14:39

Можно ли вызвать процедуру в любом месте программы

Код


procedure TForm1.DBGrid2DrawColumnCell

Я пишу так:

Код


var
  rect: TRect;
  DataCol: Integer;
  Column: TColumn;
  State: TGridDrawState;
begin
  DBGrid1DrawColumnCell(Sender, rect, DataCol, Column, State);
end;

Выводит ошибку.

Автор: Rodman 3.6.2007, 14:49

Давай полный текст проги и текст ошибки тоже!!!

Автор: Waterman 3.6.2007, 14:57

Выводит ошибку [Warning] Prog.pas(403): Variable 'DataCol' might not have been initialized

Останавливается на строке end процедуры:

Код


procedure TForm1.DBGrid2DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
 with DBGrid2.Canvas do
begin
if odd(Table2.RecNo) then Brush.Color := clInfoBk else Brush.Color :=
cl3DLight;
FillRect(Rect);
end;
DBGrid2.DefaultDrawColumnCell(Rect, DataCol, Column, State);

-> end;

Автор: Rodman 3.6.2007, 15:13

Цитата(Waterman @ 3.6.2007, 13:57

)

[Warning] Prog.pas(403): Variable 'DataCol' might not have been initialized

это не ошибка, а предупреждение... нажми F9 и если нет ERROR то запуститься все...

а если не сработает, то в поиске есть подобные вопросы

Добавлено через 2 минуты и 32 секунды
http://forum.vingrad.ru/index.php?act=Search&CODE=show&searchid=81ee68ed5f83fc1c31e00cdbecb47247&search_in=posts&result_type=topics&flag=search&debug=&highlite=datacol&skipped=

Автор: Sunvas 3.6.2007, 15:32

Waterman, ну, дык инициализируй переменную DataCol - вчитайся в предупреждение. smile

Автор: MetalFan 4.6.2007, 11:30

а еще лучше - никогда не вызывай ручками методы, назначенные(и названнные) обработчиками событий. дурной тон