Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi record in datei speichern und laden (https://www.delphipraxis.net/62012-record-datei-speichern-und-laden.html)

Weazy 29. Jan 2006 19:56

Re: record in datei speichern und laden
 
Zitat:

AssignFile(cubemapfile,path+'.mat');
Reset(cubemapfile)
i:=1;
While not eof(cubemapfile) DO
begin
Read(cubemapfile,cubemap[i]
inc(i);
end;
CloseFile (cubemapfile);
Bei diesem Code kommt immer nur "[Fehler] Unit1.pas(682): E2010 Inkompatible Typen: 'TCubeMapData' und 'procedure, untyped pointer or untyped parameter'"

Klaus01 29. Jan 2006 21:14

Re: record in datei speichern und laden
 
Zitat:

CubeMap:tCubeMapData;
CubeMapFile:file of tCubeMapData;
a:integer;
Zitat:

type
TCubeMapData=record
name:string[255];
uptex,downtex,fronttex,backtex,lefttex,righttex:tp icture;
mode:tgltexturemappingmode;
end
Zitat:

Delphi-Quellcode:
AssignFile(cubemapfile,path+'.mat');
   Rewrite (cubemapfile);
   for a:= Low (cubemap) to High (cubemap) do
   begin
     Write (cubemapfile,cubemap[a]);
   end;
   CloseFile (cubemapfile);
   result:=true


Auf einen Record kann man nicht indiziert zugreifen, wenn Du das mit cubemap[a] machen willst
solltest Du Dir ein Array für cubemap einrichten. Oder aber mit Zeigern arbeiten.

Grüße
Klaus

Weazy 29. Jan 2006 22:57

Re: record in datei speichern und laden
 
mit strings, integers usw funktioniert ja alles gut, doch wie kann ich auch andere typen verwenden (tpicture z.b)

an sniper_w: "add" und "len := Count" erzeugen nur errors :cry:


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:11 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz