Einzelnen Beitrag anzeigen

mikeslash

Registriert seit: 28. Feb 2010
18 Beiträge
 
#6

Re: 3D Koordinaten darstellen

  Alt 1. Mär 2010, 17:28
danke, genau was ich brauche.
habe aber immer nur eine zeile in der datei stehen. was mache ich falsch?

nur so als beispiel:

Delphi-Quellcode:
var
  x,y,z: extended;
  liste: TStringList;

procedure TForm1.Button1Click(Sender: TObject);
begin
  x:=0; y:=0; z:=0;

  repeat
    y:=sin(x);
    z:=cos(x);

    liste:=TStringList.Create;
    liste.Add(Format('%f %f %f', [x, y, z]));
    liste.SaveToFile('C:\Trippel.txt');
  
    x:=x+0.1;

  until x=10;
end;

gruß,
mike
  Mit Zitat antworten Zitat