Forum: Multimedia
by Noobmaster,
24. Mai 2011
Danke, wie immer die richtige Antwort :-)
An sowas denkt man als Hobbyprogrammierer aber auch nicht xD
Forum: Multimedia
by Noobmaster,
24. Mai 2011
Die Prozedur gibt es bei Andorra aber nicht... und im Tutorial scheint der Aufruf einer solchen auch nicht notwendig.
Forum: Multimedia
by Noobmaster,
24. Mai 2011
Hallo!
Das Programm soll verschiedene Rechtecke zeichnen. Momentan nur graue "Blöcke", deren Farbe ich schon auf grau gesetzt habe.
procedure ZeichneLevel(var Zeichenflaeche : TAddraw; Verschiebung : Integer);
var Rechteck : TRechteck;
begin
for i := Low(Block) to High(Block) do
begin