Edit değeri değişince mesaj versin

Edit değeri değişince mesaj versin

1 Edit ekleyip,’Editin değeri değişti’ diye bir mesaj veren kod

procedure TForm1.Edit1Change(Sender: TObject);

begin

if Edit1.Modified then ShowMessage('Editin Değeri Değişti');

end;

end.