Deutsches Lazarusforum

ah,

Danke Michl Ich habe das jetzt so ähnlich umgesetzt und es funktioniert!

Hallo Liebe Com­mu­ni­ty,

in meinem derzeitigem Projekt (einen Schachcomputer from scratch), habe Ich ein Problem mit dem Speichern meines Varianten-Baums, Ich kann alle möglichen Stellungen aus einer Stellung erzeugen und in ein Array of pposition speichern.


Tposition = array[0..7] of array[0 ...

Ah ok. Das mit dem speicher wusste ich nicht aber es wird mir sicher behilflich sein.

Vielen dank an alle Antworten

MFG
Littellittel

OK,
ich weiß was du meinst aber was hat das denn genau für einen Vorteil gegenüber eines records?
Wird bei der Variante mit record etwa alles gespeichert (also auch AEnderung und Spieler)?

Ich glaube nicht das das so sinnvoll wäre denn Aenderung muss nicht abgespeichert werden es wird nur zu jedem Punkt im Array gegeben damit die draw Funktion das ganze Array ins Image malt.

Danke für alle antworten,
Die Lösung mit dem Sizeof(integer) hat aber schon alle Probleme gelöst.

ok,
das funktioniert ich dachte das Integer währe nur ein Platzahlter für den Namen des Integers .

Die Deklaration ist folgende:

Danke für die Antwort,
aber das funktioniert nicht. Wenn ich Sizeof (Groundtyp)( Groundtyp ist der integer im record) sagt er den identifier nicht findet

Feld ist das Array.
Ich habe versucht nur Platz für "Feld.Groundtyp" zu reservieren allerdings meckert er dann das ich zu wenig Parameter habe selbes Problem mit "Feld[].Groundtyp"

Hallo,
Ich möchte in einem Programm ein statisches 2D Array abspeichern und es später wieder auslesen können. Ich habe es mit einem Stream versucht.
zum speichern:
procedure TEditor.btnsaveClick(Sender: TObject);
var
Fstream: TFileStream;
i,j:Integer;
begin
if SaveDialog1.Execute then
begin ...

Danke für alle Antworten,
ich habe es mittlerweile geschafft den code von Bresenham umzuschreiben. Ich poste ihn mal hier falls Interesse besteht.
if (circle) and (x1<>x) and (y1<>y) then//abfrage was der Benuter zeichnen möchte
begin
a:=round(abs((x-x1)/2)); //a:=Halbachsenlänge x
b:=round(abs ...

ja, wie gesagt habe ich gegoogelt konnte für mich aber kein brauchbares Ergebnis finden.
void ellipse(int xm, int ym, int a, int b)
{
int dx = 0, dy = b; /* im I. Quadranten von links oben nach rechts unten */
long a2 = a*a, b2 = b*b;
long err = b2-(2*b-1)*a2, e2; /* Fehler im 1. Schritt ...

Doch habe ich ,
Nur das Bresenham wie du schon Sagst einen Kreis zeichnet und keine Ellipse (was eigentlich ein Kreis ist nur halt gestreckt).
Und nein ich möchte keine gefüllte Ellipse sondern nur den Außenkreis.

Aber Danke für die schnelle Antwort.

Hallo,
ich habe angefangen einen Welt-editor zu Bauen der dazu dient ein Level für eine eigene Engine zu erstellen.
Die Bodentypen sind als integer-werte in einem Array gespeichert (2D). Nun möchte ich die Funktion einbauen
Kreise bzw. Ellipsen zu Zeichnen, das heißt ich muss auch eine Ellipse in ...

Ah!,
vielen dank ich habe meinen code entsprechend abgeändert und jetzt funktioniert alles so wie es soll .
Vielen Danke.