HEllo i would like to change the text of a Field if it gets the focus
Code
procedure TCrTableForm.WPRichText1EditFieldFocus(Sender: TObject; const InspName: string; Enter: Boolean; FieldObject: TWPTextObj; var Abort: Boolean);
var
value : string;
begin
if inspName = 'PROZENT' then begin
if Enter then begin
value := '12';
end
else begin
value := '12,0 %';
end;
FieldObject.EmbeddedText := value;
WPRichText1.Refresh;
end;
end;
Alles anzeigen
But i think it is not correct to do it this way, because if i do it, i didn't get evere FocsuEnter and FocusLose Event ...
if i remove the WPRichText1.Refresh, i get ALL Events, with this code i sometime didn't get the next FocusChange event.
And what is the best practise, to select the whole text if i focus a field?