-
<> (14.02.09 00:47) [0]На форме есть несколько элементов TKOLEditBox, имеющих общий обработчик события OnChange.
procedure TForm1.EditBox_H1Change(Sender: PObj);
var S: String;
begin
form.Caption := int2str(sender.tag);
end;
Можно обратиться только к sender.tag, а как то же сделать для sender.text ? -
Дмитрий К © (14.02.09 00:57) [1]PControl(Sender).Text
-
<> (14.02.09 00:59) [2]Спасибо!