Autor | Thema: DBF Datei | | Datum:25.08.02 13:35 
(eike-fremy@t-online.de) | |
Wenn ich jetzt zahlen aus einer DBF datei mit Drawtext anzeigen lassen möchte dann stehen die zahlen nicht untereinder wie kann ich es machen das die zahlen genau untereinder stehen ?????
Danke
Gruß Eike
|
| | Datum:25.08.02 15:55 
(Kerzenlicht@chello.at) | |
Hallo
Erst mal vorweg hab ich überhaupt keine Ahnung von DBF, aber ich denke, dein Problem hat was mit der formatierten Zahlenausgabe auf dem Bildschirm zu tun.
Wennst mal in der ProfanHilfe unter @Format$ nachsiehst, das ist glaub ich was du suchst.
Gruß Thomas
|
| | Datum:25.08.02 16:42 
(eike-fremy@t-online.de) | |
Das habe ich schon gemacht aber ich steige da nicht durch
hat einer mal ein beispiel???
|
| | Datum:25.08.02 16:51 
(Kerzenlicht@chello.at) | |
Hallo
Text$=@Format$("000",Zahl%)
000 bedeutet mind. 3 Stellen. Ist also Zahl% 5, würde Text$ 005 sein.
Die anderen Formatierungsmöglichkeiten solltest in der Hilfe nachschlagen und experimentieren.
Gruß Thomas
|
| | | Datum:25.08.02 17:57 
(b.kuenzel@chello.at) | |
Hallo Eike,
versuchs mal damit
CLS
Def SetTextAlign(2) !"GDI32","SetTextAlign"
Def SetLText(0) SetTextAlign(%HDC,0)'--->Text linksbündig
Def SetRText(0) SetTextAlign(%HDC,2)'--->Text rechtsbündig
Def SetCText(0) SetTextAlign(%HDC,6)'--->Text centriert
Declare z1$,z2$,z3$,z4$
'z.B. Zahlen von Datenbank
z1$="00000025.40"
z2$="00013025.00"
z3$="00000000.15"
z4$="12300025.80"
SetRText()
DrawText 150,120,Format$("#####,##0.00' EUR'",Val(z1$))
DrawText 150,135,Format$("#####,##0.00' EUR'",Val(z2$))
DrawText 150,150,Format$("#####,##0.00' EUR'",Val(z3$))
DrawText 150,165,Format$("#####,##0.00' EUR'",Val(z4$))
WaitInput
Gruß
Bernhard
|
| |
|