![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
|||
|
|||
|
Люди добрые, у меня еще такой вопрос - как отследить изменения в одной из колонок грида? Т.е. типо:
if SG1.Cells[0,r]=изменен then showmessage('dhgdfgh'); Конечно извините если повторяюсь. Какое событие, и можно кокой-то набросок. Пожалуйста... |
|
#2
|
||||
|
||||
|
Если содержимое ячейки будете изменять программно, то и отслеживайте свои действия на предмет изменений. Ежели в свойстве Вашего StringGrid-а Options стоит goEditing (разрешение на ввод со стороны пользователя, набор, вставка текста и т.п.), то сработает OnSetEditText.
|
|
#3
|
|||
|
|||
|
А как? Можно примерчик, хоть небольшой? Чтоб именно по колонке
|
|
#4
|
|||
|
|||
Меня опять игнорируют ![]() |
|
#5
|
||||
|
||||
|
Да видно просто не знает никто такого
![]() Я попробывал, но ничего у меня не получилось ![]() |
|
#6
|
||||
|
||||
|
1 строчка кода:
Код:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Grids;
type
TForm1 = class(TForm)
StringGrid1: TStringGrid;
Edit1: TEdit;
procedure StringGrid1SetEditText(Sender: TObject; ACol, ARow: Integer;
const Value: String);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.StringGrid1SetEditText(Sender: TObject; ACol,
ARow: Integer; const Value: String);
begin
if ACol=2 then Edit1.Text:=Value;
end;
end.http://data.cod.ru/84202 |