Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Probleme mit Speichern von daten


Ice - Do 13.02.03 10:21
Titel: Probleme mit Speichern von daten
Hallo Leute,

ich habe folgendes Problem: Ich möchte die Positionen von verschiedenen Typen von komponenten speichern(also X und Y Koordinate und den Namen) späater möchte ich diese Positionen mit Namen wieder in ein Array auslesen, jede Komponente in ein eigenes array um die Entfernung zwischen ihnen zu berechnen...

Hat jemand eine Idee wie ich das anstellen könnte?? z.B. Registry Ini oder DB?

Vielen Dank im voraus,

mfg
Ice


maximus - Do 13.02.03 10:50

Hi, jede compo in eine eigenes array? versteh ich nicht! macht eigentlich nur sinn, wenn man mehrere compos in ein array tut.

ich würd weder reg. noch noch ini benutzen, sondern ein typed-file.

Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
type 
  TCompoPos = packed record
     name: string[$FF];
     r : TRect;
  end;  
  TCompoPosArr = array of TCompoPos;
  TCompoPosFile = file of TCompoPos;

var PosArr : TCompoPos;
     f: TCompoPosFile;
...
//PosArr füllen
for i:= 0 to ?.count-1 do
begin
  n := length(posArr);
  setLength(PosArr,n+1);
  posArr[n].name := ?[i].name
  posArr[n].r := ?[i].rect;
end;
...
assignFile(f,'c:\test.file');
rewrite(f);
try
  for i:= 0 to length(posArr)-1 do  write(f, posArr[i]);
finally
  closeFile(f);
end;

...kannst auch das komplette array als block speichern. Oder mit dem TWriter object alle compos (die sich unter der angegebenen compo befinden), mit allen properties, speichern.

vielleicht hilft das ja :)

mfg mx.


Ice - Do 13.02.03 10:59

vielen Dank ,
ich werde das mal probieren!

mfg
Ice