Forum: Object-Pascal / Delphi-Language
Delphi
by burn,
6. Feb 2007
@ smudo
Ja, das würde gehen ist aber wie du selber schon sagst ziehmlich unübersichtlich ...
@ Die MuhKuh
Ich muss die Zeichen selber malen, da die Datei-Formate in die ich ausgeben will, die
Schriftarten nicht so unterstützen wie ich das will ...
Viel Fleißarbeit liegt noch vor mir ( bin erst beim kleinen o ) und das Grund-Problem
ist ja eigentlich gelöst ..
Forum: Object-Pascal / Delphi-Language
Delphi
by burn,
6. Feb 2007
Klar ist das auch machbar ...
nur das wird eine riiiiiieeeesige Prozedur ...
(nicht jedes Zeichen ist mit einem Strich gemalt) und das dann alles in einer prozedur ???
Da finde ich persönlich das eine Prozedur pro Zeichen übersichtlicher ist ...
Steve
Forum: Object-Pascal / Delphi-Language
Delphi
by burn,
6. Feb 2007
Hallo Smudo ...
in etwa so ... is aber nur ganz grob ..
procedure Letter_1;
begin
TextMoveTo(0,0);
TextLineTo(0,7);
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by burn,
6. Feb 2007
Hallo René,
tja ich würde ja auch gerne weniger Prozeduren haben, aber wie soll ich das anstellen,
wenn ich jedes Zeichen "malen" will.
Falls du da Ideen hast, immer her damit ...
Steve
Forum: Object-Pascal / Delphi-Language
Delphi
by burn,
6. Feb 2007
Hallo Hawkeye,
genau so funktioniert das ganze ... Die Sonderzeichen stellen kein Problem dar.
procedure _41;
begin
showMessage(')');
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by burn,
5. Feb 2007
So .. da bin ich wieder
@ SirThornberry
Leider funktioniert das nicht weil ich, wie Muetze1 schreibt, keine Methoden habe ..
@ Muetze1
Du schreibst " ... das müsste man noch umstellen"
Was und Wie müsste ich das noch umstellen...
Ein konstantes Array bringt mich da auch nicht weiter, weil ich nicht so viel Quelltext haben wollte.
Sonst könnt ich ja auch die Case-Anweisung lassen....
Forum: Object-Pascal / Delphi-Language
Delphi
by burn,
5. Feb 2007
Hallo allerseits,
ich muss für jeden Buchstaben/Zahl auf der Tastatur eine Prozedur ausführen.
Das ganze soll dann in etwa folgendermassen aussehen.
Ich habe einen Text z.B. "Dies ist ein Text"
Nun durchlaufe ich den String und lass für jedes Zeichen eine Prozedur ausführen.
procedure _49;