Autor Beitrag
mick
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 159



BeitragVerfasst: Di 30.11.04 19:19 
hallo zusammen.

hoffentlich bin ich hier richtig mit meiner bescheidenen frage:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
   if Zugnummer div 2 < 10 then
    Zug := ' ' + IntToStr(Zugnummer) + '.  ' +
     NotationsBerechnung(Auswahl_von_VonFeld,Auswahl)
   else
    Zug := IntToStr(Zugnummer) + '.  ' +
     NotationsBerechnung(Auswahl_von_VonFeld,Auswahl);
   Memo1.Lines[AktuelleZugnummer div 2] := Zug;


ich moechte in einem memo einen string einfuegen, den ich zuvor generiere. das soll aber formatiert geschehen. zugnummer faengt bei 1 an und hoert irgendwo im zehner-bereich auf. damit alles schoen untereinander angezeigt wird im memo, muss dazu vor eine einstellige zugnummer eine leerstelle kommen, bei zweistelligen natuerlich nciht. habe das mit obiger anweisung geloest, das ist aber sehr unschoen, da ich den code letztlich doppelt angeben muss. eine zusaetzliche variable fuer die leerstelle will ich auch nicht erzeugen. daher: wie kann ich IntToStr(Zugnummer) so ausgeben, dass fuer den wert immer zwei (drei, ...) plaetze reserviert werden und rechtsbuendig geschrieben wird?

bsp fuer 2 reservierte plaetze:

_1. Notation XYZ
_2. Notation ABC
[...]
10. Notation HIJ
11. Notation RST
[...]

fuer zahlen gab es doch irgendwo die moeglichkeit mit ":2" oder so. geht hier nicht. oder?

ciao,
mijozi.


Zuletzt bearbeitet von mick am Mi 01.12.04 17:21, insgesamt 1-mal bearbeitet
Karlson
ontopic starontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic star
Beiträge: 2088



BeitragVerfasst: Di 30.11.04 19:45 
Servola,

Schau dir mal die (selten benutze) FUnktion STR() in der OH an.
In deinem Beispielt würde aber wohl schon die TAB Taste reichen:

ausblenden Delphi-Quelltext
1:
Memo1.lines.add(inttostr(Zugnummer) + #9 + 'Hallo');					


gruss
BenBE
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 8721
Erhaltene Danke: 191

Win95, Win98SE, Win2K, WinXP
D1S, D3S, D4S, D5E, D6E, D7E, D9PE, D10E, D12P, DXEP, L0.9\FPC2.0
BeitragVerfasst: Di 30.11.04 19:45 
Guck dir mal die Funktion Format an:

ausblenden Delphi-Quelltext
1:
Text := Format('%.8d %20s %50s %50s', [ZugNr, DateTimeToStr(Zeit), Von, Nach]);					

_________________
Anyone who is capable of being elected president should on no account be allowed to do the job.
Ich code EdgeMonkey - In dubio pro Setting.
mick Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 159



BeitragVerfasst: Mi 01.12.04 17:45 
hallo ihr beiden.

vielen dank fuer eure hilfe. mit tab geht leider nicht, da dann der abstand zu gross wird, dazu muesste ich die tab-groesse neu definieren.
der format-befehl ich natuerlich genau das richtige fuer mich, damit bekomme ich wohl so ziemlich alles hin bzgl. string-formatierung...

danke an beide!

ciao,
mijozi.