Código Delphi [-] procedure TForm1.Edit1Click(Sender: TObject); begin if edit1.text='Ingrese nombre' then begin edit1.clear; end else // Lo que necesities end;
procedure TForm1.Edit1Click(Sender: TObject); begin if edit1.text='Ingrese nombre' then begin edit1.clear; end else // Lo que necesities end;