TStatusBar

[Sergius X]

Привет, знатоки. Хочу сделать строку статуса и чтобы в ней отображаль инфа о состоянии запроса.
Вообщем к примеру что бы отображалась количество записей в запросе.
Куда в TStatusBar нужно запихать код чтобы заработало?!

[Stilet]

Создай в Статусбаре панель (всмысле добавь ее)
А потом что -то типа:

StatisBar.Palens[0].Text:=Твой текст

[Neeter]

Запрос - это ADOQuery(или просто Query)?
Если да, то:

procedure TForm1.Button2Click(Sender: TObject);
begin
 StatusBar1.SimplePanel := true;
 StatusBar1.SimpleText := IntToStr(ADOQuery1.RecordCount);
end;

Или как сказал Stilet, можно создать панель, и уже ей присваивать:

procedure TForm1.Button2Click(Sender: TObject);
begin
 StatusBar1.SimplePanel := false;
 StatusBar1.Panels[0].Text := IntToStr(ADOQuery1.RecordCount);
end;