Einzelnen Beitrag anzeigen

Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#5

AW: DBGrid Darstellungs-Text "umwandeln"

  Alt 13. Mär 2013, 15:04
Die 'OnGetText/OnSetText'-Variante finde ich im Projektzusammenhang besser.
Ich hab ein wenig google für mich arbeiten lassen aber kein richtiges Beispiel finden können was mich weiterbringt (Übergabeparameter etc..).
Die Übergabeparameter sind doch sehr übersichtlich
(ungetestet)
Delphi-Quellcode:
procedure TForm1.ClientDataSet1TestGetText( Sender : TField; var Text : string; DisplayText : Boolean );
begin
  if not DisplayText then
    Text := StringReplace( Text, '#38', '&', [rfReplaceAll] );
end;

procedure TForm1.ClientDataSet1TestSetText( Sender : TField; const Text : string );
begin
  Sender.Value := StringReplace( Text, '&', '#38', [rfReplaceAll] );
end;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat