Problem mit record

[The_ New_Guy]

Ich brauche ein ein mehrdimensionales array, indem ich die eigenschaften font und color einspeichere.
hier die deklaration:

Delphi-Quellcode:

type
  Tcell_attributes = array of array of Record
    Font : Tfont;
    color : Tcolor;
end;
//...
var ca : Tcell_attributes;
//...
ca[x,y].font := // . . .

Mein Problem: wie kann ich überprüfen ob der wert in ca[x,y].font schon gesetzt ist,
also ob da schon was reingeschrieben wurde -?

[mkinzler]

Auf Nil prüfen bzw. Assigned()

[The_ New_Guy]

ich habe verucht die länge des arrays zu bestimmen, allerdings stürzt meine Anwendung dann auch immer ab

etwa so

Delphi-Quellcode:

  setlength(ca1,stringgrid1.Colcount);
  for x := 1 to stringgrid1.Colcount-1 do
    setlength(ca1[x], stringgrid1.RowCount);

[The_ New_Guy]

nil geht leider nicht - ich probier mal assigned

[The_ New_Guy]

funktioniert leider nicht . . .

[The_ New_Guy]

assignd funktioniert allerdings geht der code nicht richtig . . .
also ich versuche alle Zellen in einem Stringgrid mit font und color eigenschaften zu belegen.
mit color funktioniert das wunderbar - allerdings nicht mit font.

Delphi-Quellcode:

procedure Temaske_excel.Schriftartbearbeiten1Click(Sender: TObject);
begin

if Assigned(ca1[stringgrid1.Col,stringgrid1.Row].font) then
  fontdialog1.Font := ca1[stringgrid1.Col,stringgrid1.Row].font
else
  fontdialog1.Font := stdfont;

if fontdialog1.Execute then
begin
  ca1[stringgrid1.Col,stringgrid1.Row].font := fontdialog1.Font;
end;

end;

das problem : wenn ich eine zelle anklicke, das popupmenü öffen und denn auf 'schriftarten bearbeiten' klicke wird der font wert stdfont nicht richtig in den fontdialog1 eingefügt.
der fontdialog1 sollte dann doch eigentlich stdfont anzeigen, oder?

in der oncreate definiere ich stdfont so:

Delphi-Quellcode:

stdfont := Fontdialog1.font;

[DeddyH]

Zitat:

Zitat von The_New_Guy

mit color funktioniert das wunderbar - allerdings nicht mit font.

Das könnte daran liegen, dass TFont eine Klasse ist, TColor hingegen nicht :zwinker: .

[The_ New_Guy]

ahh daddy hat ahnung!(cool) wie bekomme ich das hin? muss ich da mit create arbeiten?

[DeddyH]

Haargenau, Du musst eine Klasse erst instanziieren. Vergiss aber bitte nicht, den belegten Speicher zum Schluss wieder freizugeben.

[The_ New_Guy]

villeicht noch ein kleines Beispiel . . .

das ist doch ein array - muss ich jedes element einzelnd createn d.h. für die ganze Matrix
einzelnd?`oder gibts ne lösung das besser hinzubekommen. Was ist mit font selber - muss ich auch ein tfont objekt erzeugen?