![]() |
DBEditFeld Text anfügen geht nicht
Hallo Delphifreunde,
ich habe auf einer Form 2 DBEditfelder(TEL) + (FAX), in dem ersten befindet sich die Tel. Nr z.B. 0865 708 92 11, im zweiten DBEditfeld soll nun, sobald dieses 2.DBEdit den Focus erhält, ein Tel des Strings aus dem ersten DBEdit Feld (Tel) eingetragen werden. z.B. 0865 708 92. Dies funktioniert auch, aber sobald ich ein Zeichen hinter dem Text in DBEdit2 (Fax) anhängen möchte, wird das 2. DBEditfeld komplett gelöscht. BeispielCode:
Code:
Wie kann ich es lösen, das der Teil der Telefonnummer stehen bleibt und ich nur die 2 stellige Faxnummer anhängen kann ?
procedure TfrmAdmin.DBEdit_MA_FAXEnter(Sender: TObject);
begin TsuiDBEdit(Sender).Color := $00C6FFFF; IF DBEditTEL.Text<> '' then begin DBEdit_MA_FAX.Text := Leftstr(DBEditTEL.Text,11); //DBEdit_MA_FAX.SelText := DBEdit_MA_FAX.Text; end; end; Vielen Dank für eure Hilfe. mfg Nachstreuner |
AW: DBEditFeld Text anfügen geht nicht
Für eigene Eingaben würde ich "normale" Edits nehmen, die nicht an DB-Feldern hängen. Da kannst Du dann schalten und walten, wie Du lustig bist.
|
AW: DBEditFeld Text anfügen geht nicht
Danke DeddyH,
will heißen, für DBEditFelder gibts hierzu keine Lösung ? DBEditfelder deswegen, weil die Daten bei verlassen des Feldes sofort in die DB eingetragen werden sollen. gruss nachtstreuner |
AW: DBEditFeld Text anfügen geht nicht
Das Speichern kann man ja auch selbst anstoßen. Zumindest erscheint mir das einfacher als mit den datensensitiven Controls herumzuhantieren.
|
AW: DBEditFeld Text anfügen geht nicht
Zitat:
Sonst sehe ich keinen Grund... Oder hab ich das falsch verstanden?` Mavarik |
AW: DBEditFeld Text anfügen geht nicht
Hallo Maverik,
doch das 2. DBFeld hat den Focus, und einen Teilinhalt vom 1.DBedit. Der Cursor steht am Ende des textes im 2.DBEdit. Sobald ich nun die Ziffer 22 eingeben möchte, werden alle Zeichen davor gelöscht. mfg Nachtstreuner |
AW: DBEditFeld Text anfügen geht nicht
hmm Versuch mal
Delphi-Quellcode:
Mavarik
Selstart := length(XY);
SelLength := 0; |
AW: DBEditFeld Text anfügen geht nicht
Hallo deddyH,
habe nun doch ein Editfeld genommen. Vielen dank. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 20:02 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz