Delphi. UniGUI. ActionColumn

Колонка действий помогает вынести действия со строкой грида, прямо в сам грид, выглядит это так

Как ее настроить?

DBGrid -> Columns ->Выбираем любую колонку, которую мы определили как колонку действия для себя и включаем соответствующее свойство

Далее, нам необходимо добавить и настроить кнопки в Buttons. Иконки можно брать из UniNativeImageIndex

Сами действия мы можем обработать вот так

procedure TMainForm.UniDBGrid1ColumnActionClick(Column: TUniDBGridColumn;
  ButtonId: Integer);
begin
  case ButtonId of
    0 :
      begin
        ClientDataSet1.Edit;
      end;

    1 :
      MessageDlg('Are you sure', mtConfirmation, mbYesNo,
        procedure(Sender: TComponent; ARes: Integer)
        begin
          case ARes of
            mrYes : ClientDataSet1.Delete;
          end;
        end
      );

    2 :
      begin
        ClientDataSet1.Edit;
        ClientDataSet1.FieldByName('LastInvoiceDate').AsDateTime := Date;
        ClientDataSet1.Post;
      end;

  end;
end;
This entry was posted in Без рубрики. Bookmark the permalink.