Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.016 c
2-1193582414
AlexanderMS
2007-10-28 17:40
2007.11.18
Что это такое - "the instance handle of the application"?


6-1174461755
snake77
2007-03-21 10:22
2007.11.18
Copy in TWebBrowser


2-1193118344
F@T@L_Err0r
2007-10-23 09:45
2007.11.18
Выбор папки


15-1192118907
Kolan
2007-10-11 20:08
2007.11.18
Еще раз вопрос про BugTracking, старая ветка пропала&#133


15-1192369598
sdubaruhnul
2007-10-14 17:46
2007.11.18
Электроника, с чего начать?




   Наверх