Deutsches Lazarusforum

Super haut alles hin
Dankeschön ^^

Richtig verstanden und Problem gelöst
Wenn ich das Programm mit dem Bild über ein USB-Stick auf ein anderen PC abspielen möchte, passt der Computer den Dateipfad dann automatisch an oder was muss ich tun, dass er es macht?

Naja es passiert ja auch nichts. Es flackert nur kurz, was mir halt zeigt, dass das Programm irgendetwas tut, aber die Zeichnung wird davon nicht gelöscht.

wieder nicht funktioniert :/

hat leider nicht funktioniert...
Danke trotzdem

Hallo zusammen,

auf einem Bild mit TImage habe ich mit Image1.Canvas etwas gezeichnet. Da ich mit einem Button diese Zeichnung wieder löschen möchte tippe ich ja "Image1.canvas.clear" oder "Image1.canvas.refresh". Leider Cleart er bei ersterem nicht nur die Zeichnung von Canvas sondern auch das ...

Danke für deine Hilfe, ich weiß sie sehr zu schätzen , aber ich glaub ich zeig das in meiner nächsten Informatikstunde mal meiner Lehrerin. Es macht glaub ich mehr Sinn, wenn man mal den gesamten Quelltext im Blick hat und das Problem vorführen kann.

Vielen dank trotzdem

function koordinaten(x,y:real):tpoint;
begin
koordinaten.X:=pixX+round(x*xEinheit);
koordinaten.Y:=pixY-round(y*yEinheit);
end;
In meinem Falle ist PixX ca 1000, PixY 800
x bzw yEinheit berechne ich so:
xnull:=pixX div 2;
ynull:=pixY div 2;
xMax:=360;
yMax:=180;
xEinheit:=xnull/xMax ...

Ich habs jetz mal gecheckt und ich weiß jetz das o.x und o.y null sind. Ich weiß aber nicht warum? Die werden ja durch die Koordinatentransformation berechnet.

kann eigentlich nicht sein, der Punkt ist ziemlich in der Mitte...
ich mach die Koordinatentransformation mit den Weltkoordinaten 10|51.
Soll ich die Funktion auch mal angeben?

das habe ich jetz auch verstanden und danke dafür

aber irgendetwas scheint noch nicht zu stimmen, denn wenn ich für a und d bei Pinn(o.x+a,o.y+d) mal 50 eingebe, sprich pinn(o.x+50,o.y+50), dann setzt er die Pinn bei bei 50|50

ne, dass mit den Rechnungen/Gleichung läuft glatt. Er will bloß die Pinn jetzt nicht setzten, deshalb habe ich ja noch die Funktion mit rangehangen. Vielleicht liegt dort noch irgendwo ein Fehler?

also ich hab das jetz mal als Prozedur geschrieben und Yogi72108's Rat angewendet. Mit c tritt der Fehler jetzt nicht auf, aber dafür bei: e:=sqrt(sqr(a-o.x)+sqr(d-o.y));
O berechne ich so: o:=koordinaten(-74,40);
Koordinaten ist dabei die herkömmliche Funktion der Koordinatentransformation ...

kilometer berechne ich folgendermaßen: pixX ist Image1.Width und PixY ist Image1.height.

ja Form1 existiert. Wäre es logischer dies als Prozedur zu schreiben?