globaler record, is das überhaupt möglich?

[olf]

hi.

ich hab mir überlegt, dass die einfachste möglichkeit für mein projekt eine globalen record wäre.
aber ich bekomme folgenden fehler:

Code:

';' expected but '=' found

ich weiß was das bedeutet, aber gibt es nicht eine möglichkeit, das ich doch noch einen globale record verwenden kann?

code ausschnitt:

Delphi-Quellcode:

...

var
  Form1: TForm1;

implementation

uses Unit2;

{$R *.dfm}

var content : record
            autor       : string = Autor_Edit.Text;
            publisher   : string = Publisher_Edit.Text;
            copyright   : string = Copyright_Edit.Text;
            keywords    : string = Keywords_Edit.Text;
            description : string = Description_Edit.Text;
            end;

procedure TForm1.MetaInfo_BtnClick(Sender: TObject);
begin
  ExplainForm.Show;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
Meta_Memo.Lines.Clear;
Meta_Memo.Lines.Add(content)
end;

end.

bis denne

[Mautstelle]

globaler record geht natürlich....
aber ich glaub das problem liegt bei der initialisierung von deinen strings,
schreib einfach deinen record nur so(zumindest hat das bei mit gefunzt):

Delphi-Quellcode:

var content : record
            autor       : string;
            publisher   : string;
            copyright   : string;
            keywords    : string;
            description : string;
            end;

und geb den string seinen inhalt dann bei einem ereignis wie einem buttonklick, vielleicht kannst du die Strings auch im oncreate von form1 laden. gruß

[Matze]

Mach's so:

Delphi-Quellcode:

var
  Form1: TForm1;

var content : record
            autor       : string;
            publisher   : string;
            copyright   : string;
            keywords    : string;
            description : string;
            end;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  content.autor       := Autor_Edit.Text;
  content.publisher   := Publisher_Edit.Text;
  content.copyright   := Copyright_Edit.Text;
  content.keywords    := Keywords_Edit.Text;
  content.description := Description_Edit.Text;
end;

Da, wo du's deklariert hast werden die Edits noch nicht erkannt, so zu sagen. ;)


Nachtrag: Too tired and too late. :(

[olf]

und genau DAS wollte ich vermeiden.
ich wollte den variablen im record gleich beim deklarieren einen Wert zuweisen. :roll:

daraus schließe ich, das ich das nicht machen kann.
aber trotzdem danke :thuimb:

[Chewie]

Du weist den Strings als Vorbelegung den Inhalt eines Textfeldes zu. Das kann natürlich gar nicht gehen, da zum Compilierzeitpunkt diese Textfelder noch gar nicht existieren!

[Matze]

@Olf: MAcht das so einen großen Unterschied, ob man es am Anfang zuweist, oder am Anfang? :mrgreen:

Ne, ich meine, einmal so direkt und einmal im OnCreate, das ist doch das Selbe, oder nicht? :gruebel:

[olf]

so hätte ich mir weitere tipparbeit ersparen können....

[Luckie]

Ein Record wird mit dem Schlüsselwort type eingeleitet und nicht [b]var.

[olf]

oh :oops:
wusste ich nicht.
hat sich aber erledigt die ganze sache. trotzdem danke, hab viel dazugelernt :zwinker: