hallöle, ich bins wieder, ich hab mal wieder was einfaches schreiben wollen, hier der ausschnitt der nicht funktioniert:
Delphi-Quellcode:
unit auto;
interface
uses Graphics;
type TAuto=class(TObject)
private
public
v:Single;
//Geschwindigkeit
x, y:integer;
//Position
farbe:longint;
//Lackierung
constructor erzeugen(xpos,ypos:integer; color:longint);
procedure schneller(dv:real);
procedure bremsen (dv:real);
procedure zeichnen(canvas:TCanvas);
end;
implementation
constructor TAuto.erzeugen(xpos,ypos:integer; color:longint);
begin
x:=xpos;
//
y:=ypos;
// falsche werte (aber xpos,ypos,color richtig!!
farbe:=color;
//
end;
das is der teil in der Auto-
unit......
in unit1 steht folgendes:
Delphi-Quellcode:
procedure TForm1.btn_autoClick(Sender: TObject);
begin
auto1.erzeugen(5,55,clNavy);
end;
nun die frage! beim debugging mit F7 komm ich bis zu Zeile x:=xpos; (in
unit Auto) wenn ich mir dann den wert für x anschaue liegt der exakt bei
167772182, y hat dann auch sonen utopischen wert, und farbe entspricht nicht dem wert von color!
Woran kann das denn liegen, das is doch das simpelste was es gibt, und meiner meinung nach kein fehler drin.
ich hab ein Image mit Align=alClient auf der Form liegen, aber die das kann doch nicht der Grund sein oder? ich meine das er vielleicht mit der Position auf der Form, bzw. dem Image ducheinander kommt.
was sagt ihr dazu?
gruß haegar