VPF::компонент StringGrid - Форум программистов

Vinnety

Дата 19.6.2003, 14:07 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 69
Регистрация: 8.4.2003

Репутация: нет
Всего: нет

Подскажите, по какому событию собирать данные с грида сразу после ввода текста (а не одного символа), может есть какой-нибудь такой компонент с такой возможностью?

dm9

Дата 19.6.2003, 14:57 (ссылка)

(нет голосов)

Загрузка ...

Дмитрий Копытин

Профиль
Группа: Vingrad developer
Сообщений: 3876
Регистрация: 22.7.2002
Где: Москва

Репутация: 6
Всего: 137

Код

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Grids, StdCtrls, Buttons;

type
  TForm1 = class(TForm)
    StringGrid1: TStringGrid;
    BitBtn1: TBitBtn;
    Memo1: TMemo;
    procedure StringGrid1SelectCell(Sender: TObject; ACol, ARow: Integer;
      var CanSelect: Boolean);
    procedure StringGrid1Exit(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
begin
   with StringGrid1 do
      Memo1.Lines.Add (IntToStr (Col) + ' : ' + IntToStr (Row) + ' - ' + Cells[col,row]);
end;

procedure TForm1.StringGrid1Exit(Sender: TObject);
var
   B : Boolean;
begin
   with StringGrid1 do
      StringGrid1SelectCell (Sender, Col, Row, B);
end;

end.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »