Delphi6: TDBEdit mit 'Maske' versehen

Hallo,

ich habe ein TDBEdit-Feld, welches auf ein (13-stelliges) String-Feld zugreift. Nun möchte ich aber dieses Feld nicht als ein String dargestellt haben, sondern die letzten drei Stellen absondern, also anstatt

blablaablabla

soll

blablaabla/bla

an gezeigt werden.
wie geht das?
Danke,
Michl

Hallo Michl,

da noch keiner eine Idee hatte, versuche ich es mal.

ich habe ein TDBEdit-Feld, welches auf ein (13-stelliges)
String-Feld zugreift. Nun möchte ich aber dieses Feld nicht
als ein String dargestellt haben, sondern die letzten drei
Stellen absondern, also
anstatt

blablaablabla

soll

blablaabla/bla

an gezeigt werden.
wie geht das?

Mit TDBEdit gehts nicht

Es sei denn, der Inhalt wird nur schreibgeschützt dargestellt. Dann kannst Du ein berechnetes Feld nehmen und im OnCalcFields-Ereignis die entsprechende Formatierung vornehmen.

Ansonsten sehe ich nur diese Möglichkeiten:
Eine Ableitung von TDBEdit erstellen und die EditMask implementieren bzw. veröffentlichen. Sie ist ja im Prinzip vorhanden, da TDBEdit von TCustomMaskEdit abgeleitet ist (so wie TMaskEdit).

Oder Du verwendest direkt TMaskEdit und kümmerst Dich selber um die Datenbankanbindung.

Oder Du verwendest eine Fremd-Komponente (z.B. Orpheus).

hth
Christian