Allgemeine Fragen zur PROFAN Programmierung

Views (Heute): 240921 (2357)

| Suchen
| Zurück zur Übersicht

Autor | Thema: DBF Datei
Eike Fremy
| 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
Thomas Ungerböck
| 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
Eike Fremy
| 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???
Thomas Ungerböck
| 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
Gerhard Putschalka
| Datum:25.08.02 17:13 (g.putschalka@utanet.at) |
Hallo Eike, auf meiner HP http://members.telering.at/g.putschalka/index.html unter Prozeduren gibt es ein Beispiel QTxtWeit. Das müßte Dir genug Hilfe geben. Mfg Gerhard.
Bernhard Künzel
| 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
Eike Fremy
| Datum: 26.08.02 06:43 (eike-fremy@t-online.de) |
Danke für eure Beispiele

| Zurück zur Übersicht