Ru-Board.club
← Вернуться в раздел «Прикладное программирование»

» Помогите как вставить кнопка в ячейке Dbgrid Delphi

Автор: Chulpon
Дата сообщения: 17.08.2009 13:01
Привет всем!
Помогите как вставить кнопка в ячейке Dbgrid?
Мне надо, чтобы на каждой строке рисовать три кнопки
Удалить Сохранить Редактировать когда стою на активную запись
Есть Dbgrid c данными 4 полей + добавил еще колонку в гриде
и на форму положил три TButtona
formoncreate сделал
button.visible:=false
procedure TfrmCMPMain.grdOperDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
var
DrawState: Integer;
DrawRect: TRect;
begin
if (gdfocused in State) then
begin
if (Column.index =5) then
with button do
begin
Left := Rect.Left + grdOper.Left + 2;
Top := Rect.Top + grdOper.Top + 2;
Width := Rect.Right - Rect.Left;
Width := Rect.Right - Rect.Left;
Height := Rect.Bottom - Rect.Top;
Visible := True;
end
end;

Но это дает резултать
Автор: urmigar
Дата сообщения: 18.08.2009 16:00
Chulpon


Цитата:
Но это дает резултать

Что у тебя с результатом?

Попробуй сделать у кнопок Parant'ом гриду или попробуй просто их рисовать

Страницы: 1

Предыдущая тема: Delphi: Создание простого цветного TMemo или TEdit


Форум Ru-Board.club — поднят 15-09-2016 числа. Цель - сохранить наследие старого Ru-Board, истории становления российского интернета. Сделано для людей.