| Autor |
Beitrag |
D. Annies
      
Beiträge: 1843
windows 7
D6 Enterprise, D7 Pers und TD 2006
|
Verfasst: Mo 06.04.09 09:23
Hi, Delpher,
Ich sende die Daten aus einer DBTabelle nach Excel. Klappte wunderbar, als die "Zahl" im Feld 'ISBN' 10-stellig war. Nun stelle ich Artikel für Artikel um auf 13-stellige Zahl/Anzeige und siehe da, Excel präsentiert mir etwas in der Art 9,783546 E+12.
Es ist ein Feld String[13] und ich sende es nach wie vor als string. Ich kann es in Excel formatieren als Zahl, dann habe ich wieder die richtige Anzeige. Aber das ist ja nun nicht der Sinn der Sache.
Wer hat auch solche "Erfahrungen" gemacht und kann helfen?
Gruß, Detlef
_________________ ut vires desint, tamen est laudanda voluntas
|
|
D. Annies 
      
Beiträge: 1843
windows 7
D6 Enterprise, D7 Pers und TD 2006
|
Verfasst: Mo 06.04.09 11:31
Hi, Delpher,
habe jetzt das folgende gefunden - es funzt auch:
Delphi-Quelltext 1: 2:
| excel.activesheet.pagesetup.LeftMargin := 35; excel.activesheet.pagesetup.RightMargin := 10; |
solong, Detlef
_________________ ut vires desint, tamen est laudanda voluntas
|
|
ene
      
Beiträge: 779
Erhaltene Danke: 1
Vista, XP, W2K
Delphi, .Net, Deutsch und Englisch
|
Verfasst: Mo 06.04.09 11:43
Hi,
hast du mal versucht in der Abfrage das Feld durch Typumwandlung entsprechend zu Formatieren? Manchmal beißen sich . und ,.
_________________ Wir, die guten Willens sind, geführt von Ahnungslosen, Versuchen für die Undankbaren das Unmögliche zu vollbringen.
Wir haben soviel mit so wenig so lange versucht, daß wir jetzt qualifiziert sind, fast alles mit Nichts zu bewerkstelligen.
|
|
D. Annies 
      
Beiträge: 1843
windows 7
D6 Enterprise, D7 Pers und TD 2006
|
Verfasst: Mo 06.04.09 12:48
Hi, ene,
nee, das ist es leider nicht, aber ich habe jetzt ein Hochkomma davor gesetzt und nu gehts. (Die Antwort oben gilt nicht, da habe ich den Thread verwechselt)
Gruß, Detlef
_________________ ut vires desint, tamen est laudanda voluntas
|
|
ene
      
Beiträge: 779
Erhaltene Danke: 1
Vista, XP, W2K
Delphi, .Net, Deutsch und Englisch
|
Verfasst: Mo 06.04.09 13:04
Das Hochkomma ist ja eigentlich auch nur das Auswerten als Text. Normalerweise reicht die Typumwandlung aus. In eine Vorlage möchtest du nicht exportieren?
_________________ Wir, die guten Willens sind, geführt von Ahnungslosen, Versuchen für die Undankbaren das Unmögliche zu vollbringen.
Wir haben soviel mit so wenig so lange versucht, daß wir jetzt qualifiziert sind, fast alles mit Nichts zu bewerkstelligen.
|
|
D. Annies 
      
Beiträge: 1843
windows 7
D6 Enterprise, D7 Pers und TD 2006
|
Verfasst: Mo 06.04.09 19:57
Nein, nur in eine Tabelle.
Es sind jetzt in der linken oberen Ecke kleine Winkel zu sehen, Fehler ignorieren usw. aber der Ausdruck (Seitenansicht) ist ok ohne weitere Nacharbeit. So geht's,
Grüße aus Lübeck, Detlef
_________________ ut vires desint, tamen est laudanda voluntas
|
|
ene
      
Beiträge: 779
Erhaltene Danke: 1
Vista, XP, W2K
Delphi, .Net, Deutsch und Englisch
|
Verfasst: Di 07.04.09 08:03
Was ist denn das für ein Datentyp in der Tabelle und formatierst du ihn in der Abfrage?
_________________ Wir, die guten Willens sind, geführt von Ahnungslosen, Versuchen für die Undankbaren das Unmögliche zu vollbringen.
Wir haben soviel mit so wenig so lange versucht, daß wir jetzt qualifiziert sind, fast alles mit Nichts zu bewerkstelligen.
|
|
D. Annies 
      
Beiträge: 1843
windows 7
D6 Enterprise, D7 Pers und TD 2006
|
Verfasst: Di 07.04.09 10:53
Hi, Jan,
es sind String[13] und formatieren tue ich nicht, sondern sage einfach
excel.cells[n,k] := Qxy.fieldbyname('ISBN').asstring;
Recht harmlos, nicht?
Gruß, Detlef
_________________ ut vires desint, tamen est laudanda voluntas
|
|
ene
      
Beiträge: 779
Erhaltene Danke: 1
Vista, XP, W2K
Delphi, .Net, Deutsch und Englisch
|
Verfasst: Di 07.04.09 11:05
Je nach DBMS könnte man es auch noch Versuchen mit einer Typumwandlung in der Abfrage. Wenn du so wie so schon in dem Excelobjekt arbeitest, kannst du auch einfach mit excel.Column('A').NumberFormat:= '@' arbeiten. Den 1 Zeiler vor dem Einfügen sollten man verschmerzen können. Oder halt mit einer xlt arbeiten.
_________________ Wir, die guten Willens sind, geführt von Ahnungslosen, Versuchen für die Undankbaren das Unmögliche zu vollbringen.
Wir haben soviel mit so wenig so lange versucht, daß wir jetzt qualifiziert sind, fast alles mit Nichts zu bewerkstelligen.
|
|
D. Annies 
      
Beiträge: 1843
windows 7
D6 Enterprise, D7 Pers und TD 2006
|
Verfasst: Di 07.04.09 11:08
Hi, Jan, ick probier dat mal, Detlef
_________________ ut vires desint, tamen est laudanda voluntas
|
|
|