Edit1Change method

Applies to
TForm4

Declaration
procedure Edit1Change(Sender: TObject);

Implementation

procedure TForm4.Edit1Change(Sender: TObject);
begin
if FUpdating then Exit;
CurrText.Size := StrToInt(Edit1.Text);
End;


HTML generated by Time2HELP
http://www.time2help.com