VPF::Вызов процедуры - Форум программистов

Waterman

Дата 3.6.2007, 14:39 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 29
Регистрация: 11.9.2005

Репутация: нет
Всего: нет

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

Код


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 (ссылка)

(нет голосов)

Загрузка ...

CIO

Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 1
Всего: 122

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

--------------------

CRM с функцией АвтоОбзвона

Лотереи мира

Waterman

Дата 3.6.2007, 14:57 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 29
Регистрация: 11.9.2005

Репутация: нет
Всего: нет

Выводит ошибку [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 (ссылка)

(нет голосов)

Загрузка ...

CIO

Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 1
Всего: 122

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

)

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

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

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

Добавлено через 2 минуты и 32 секунды
поиск

--------------------

CRM с функцией АвтоОбзвона

Лотереи мира

Sunvas

Дата 3.6.2007, 15:32 (ссылка)

(нет голосов)

Загрузка ...

Соль и сахар

Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: 2
Всего: 89

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

--------------------

Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.

MetalFan

Дата 4.6.2007, 11:30 (ссылка)

(нет голосов)

Загрузка ...

Аццкий Сотона

Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 22
Всего: 128

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

--------------------

There are always someone smarter than you...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »