Einzelnen Beitrag anzeigen

Benutzerbild von RWarnecke
RWarnecke

Registriert seit: 31. Dez 2004
Ort: Stuttgart
4.408 Beiträge
 
Delphi XE8 Enterprise
 
#1

Einen gecasteten String mit Zeichen auffüllen in einer SQL Anweisung

  Alt 10. Mär 2013, 08:00
Datenbank: Absolute Database • Version: 6.2.0 • Zugriff über: ComponentAce
Hallo zusammen,

in einem Programm von einem Kunden benutze ich DB-Komponenten. Genauer gesagt habe ich das Problem bei einer TAdvDBLookupCombobox. Hier wird für die Listsource eine Query ausgeführt und der Inhalt als Auswahl in der TAdvDBLookupCombobox angezeigt. Das funktioniert auch soweit sehr gut. Jetzt zum eigentlichen Problem, ich habe in der Query ein Integer-Feld welches ich mit dem Befehl cast zu einem String mache.
Code:
  cast(facility.AiCode as String)
Bisher wurden immer nur 4-stellige Zahlen in der Spalte eingetragen. Nun sollen in der gleichen Spalte auch 1 - 3 stellige Zahlen stehen können und diese sollen dann entsprechend vorne mit Nullen aufgefüllt werden, wenn die Query für die Listsource in der TAdvDBLookupCombobox ausgeführt wird. Ein Beispiel, wenn in der DB-Tabelle eine 5 steht, dann soll bei dem obenstehenden CAST-Befehl 0005 herauskommen.

Gibt es hier einen SQL-Befehl, der mir so eine Ausgabe ermöglicht oder muss ich die Komponente TAdvDBLookupCombobox durch eine normale Combobox ersetzen und die Formatierung der Zahl im Quelltext vornehmen ?
Rolf Warnecke
App4Mission

Geändert von RWarnecke (10. Mär 2013 um 08:15 Uhr)
  Mit Zitat antworten Zitat