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

Вниз

СтатусБар как его инициализировать!!   Найти похожие ветки 

 
Alik$ ©   (2003-09-03 10:19) [0]

СтатусБар как его инициализировать!!
Т.е. нужно вывести количество строк в базе на статус панель
я делаю так но без результатов

procedure TMainForm.my(Sender: TObject; const Rect: TRect; Field: TField;
State: TGridDrawState);
var
Col, Row: Integer;
RowHeight: Integer;
c:String;

begin
if gdFocused in State then
begin
RowHeight := Rect.Bottom - Rect.Top;
Row := (Rect.Top div RowHeight) - 1;
Col := Field.Index;
c:=IntToStr(col);
Statusbar1.Panels[0].Text := c;
end;
end;


 
Vlad ©   (2003-09-03 10:35) [1]

Ты при отрисовке ячейки грида пытаешься показать Field.Index в статусбаре. Зачем ?
Может ты не тот код привел ?



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

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

Наверх




Память: 0.46 MB
Время: 0.017 c
14-82415
K .o.Z
2003-09-06 19:52
2003.09.25
Украина - Северная Ирландия


14-82470
СуперТупик
2003-09-06 16:48
2003.09.25
Вирус


1-82220
Masterok
2003-09-12 11:45
2003.09.25
ЕЩЁ 1 ВОПРОС ПРО ЗВУК (громкость)


14-82391
Nik8.
2003-09-05 12:32
2003.09.25
Документация


14-82400
Dmitriy O.
2003-09-03 08:53
2003.09.25
Я счастлив что я есть