Hallo Leute, ich bastel seit ewiger Zeit inzwischen ( wie schon einige hier wissen ) an einer Minigolf-Simulation,
ich bin inzwischen an einem Editor, mit dem man die Level kreieren kann. Es gibt in dem Spiel unteranderem ein "Powerschubgebiet" - der Typ sieht wie folgt aus:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
| TVector2D = record
x, y: Single;
end;
TLine = record
p, r: TVector2D;
end;
TBarricade = record
a, b, c, d: TLine;
end;
TPower = (N, O, S, W);
TPowerarea = record
A: TBarricade; P: TPower; end; |
Ich müsst nicht alles verstehen - wichtig ist nur der Typ TPower.
Nun liest das Programm aus einer Quelltextdatei die Informationen und erfährt unteranderem ,dass in dem Level eine "Powerarea" ist. List das Gebiet aus und anschließend TPower. Da alles, was aus der Textdatei geholt wird, anfangs als String gespeichert wird. Nun schreibe ich eine Function, die den String bzw. den einzelnen Buchstaben ( -> Char ) ausliest, das sieht folgendermaßen aus:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
| function Char_to_Power(C: Char): TPower;
begin
case C of
'N': result := N;
'O': result := O;
'S': result := S; 'W': result := W;
end;
end; |
Wieso ist der Buchstabe S ohne Hochstriche für Delphi trotzdem ein String - das komische: Bei den anderen Buchstaben kommt das nicht (?)
Ich hffe auf schnelle Antwort, Grüße Thomas
beastofchaos
