Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.11.18;
Скачать: CL | DM;

Вниз

Господа подскажите плз , не пойму в чем ошибка   Найти похожие ветки 

 
smartleds   (2007-10-24 01:19) [0]

хочу изменить размер заливки в ячейке компонента StringGrid
для чего в обработчике события ONDrawCell
Написал следующие

procedure TForm2.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;  Rect: TRect; State: TGridDrawState);
var RC:TRect;
 begin
 RC:=RECT(Rect.Left,Rect.Top,Rect.right,Rect.Bottom );
StringGrid1.Canvas.Brush.Color:=RGB(k div 2,k div 2,k div 2);
StringGrid1.Canvas.FillRect(RC);
end;
В строке RC:=..... вылазит ошибка [Error] tab.pas(34): Missing operator or semicolon
Что она это значит?


 
Германн ©   (2007-10-24 01:37) [1]

Да забавно.

> хочу изменить размер заливки в ячейке компонента StringGrid

А где в коде эти самые "изменения"?
Не вижу!
Ну а то что
> В строке RC:=..... вылазит ошибка [Error] tab.pas(34): Missing
> operator or semicolon
так и что ты ожидал увидеть?


 
Германн ©   (2007-10-24 02:09) [2]


> Германн ©   (24.10.07 01:37) [1]
>
> Да забавно.
>

Да для Д6 это актуально. Компилятор Д6 не умеет различать вызов "стандартной функции" и обращения к параметру процедуры. Неужели это действительно для 2006,2007?


 
smartleds   (2007-10-24 14:34) [3]

Изменения я не внес чтобы код был более чиитаемым, написано для D7.
А в чем ошибка намекните если не трудно...


 
Ins ©   (2007-10-24 14:44) [4]


> А в чем ошибка намекните если не трудно...

Вам же намекнули :) Rect - это не только название функции, но и имя параметра, передаваемого в обработчик события.

И вообще зачем заводить лишнюю переменную и копировать в нее параметр Rect, почему бы сам параметр не использовать?


 
boa_kaa ©   (2007-10-24 14:46) [5]

В том, что Rect здесь не ф-ия, а параметр
RC := Classes.Rect();


 
smartleds   (2007-10-24 15:10) [6]

Спасибо дошло!



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

Текущий архив: 2007.11.18;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.023 c
15-1192633707
Slider007
2007-10-17 19:08
2007.11.18
С днем рождения ! 17 октября 2007 среда


15-1192569792
Yakov
2007-10-17 01:23
2007.11.18
Неизвестный издатель


2-1193209961
СержК
2007-10-24 11:12
2007.11.18
Как отфильтровать набор данных по текстовому полю


4-1178699936
buben
2007-05-09 12:38
2007.11.18
Как убрать крестик закрытия в чужом приложении?


15-1192398990
Petr V. Abramov
2007-10-15 01:56
2007.11.18
как запрораммировать на Delphi