Speichern Button

[rollstuhlfahrer]

Hallo und herzlich willkommen in der DP

Wenn wir jetzt auch noch wissen würden wo Zeile 73 ist, dann ist alles gut.

Bernhard

[DeddyH]

Wenn ich mir die Deklaration des Formulars ansehe komme ich zu dem Schluss, dass das Lesen keine Methode, sondern wahrscheinlich eine reguläre Prozedur ist. Dort ist dann die RadioGroup natürlich nicht bekannt.

[edit] Sry, Willkommen in der DP [/edit]

[himitsu]

jupp, das "Lesen" ist keine Methode von TForm1,
sondern die Initialisierungsprozedur der Unit, da du den Funktions-Header vergessen hast.

Delphi-Quellcode:

procedure TForm1.SpeichernClick(Sender: TObject); { der Funktions-Header }
var
dummy_inifile:tinifile;
begin
dummy_inifile:=tinifile.create('Auswertung.ini');
dummy_inifile.writeinteger('Inifile_section','Radiogroup1',Radiogroup1.ItemIndex);
dummy_inifile.free;
end;

// Lesen:

{ hier fehlt etwas ganz Wichtiges }
var
dummy_inifile:tinifile;
begin
dummy_inifile:=tinifile.create('dateiname.ini');
radiogroup1.itemindex:=dummy_inifile.readinteger('Inifile_section','Radiogroup1',-1);
dummy_inifile.free;
end;

Und da dieses keine Methode der Form ist, kann es so auch nichts kennen, was innerhalb der Form deklariert ist.

Am Ende fehlt dir der Laden-Button und die zugehörige OnClick-Methode.

[DeddyH]

Richtig. Es müsste so lauten:

Delphi-Quellcode:

procedure TForm1.Laden; //diese Zeile ist enorm wichtig
var
dummy_inifile:tinifile;
begin
dummy_inifile:=tinifile.create('dateiname.ini');
radiogroup1.itemindex:=dummy_inifile.readinteger('Inifile_section','Radiogroup1',-1);
dummy_inifile.free;
end;

Außerdem musst Du die Methode noch im interface-Abschnitt bekanntmachen.

Delphi-Quellcode:

type
  TForm1 = class(TForm)
  ...
  procedure Laden;
  ...
  end;

[rollstuhlfahrer]

Und dann noch im OnCreate der Form die Laden-Prozedur aufrufen.

Bernhard

[himitsu]

Zitat von rollstuhlfahrer:

Und dann noch im OnCreate der Form die Laden-Prozedur aufrufen.

Oder das Ganze direkt ins OnCreate rein. (und die OOP-Fanatiker werden uns dafür bestimmt erschlagen )

[Speter]

Ich versteh nur Bahnhof
bin erst seit ganz kurzer Zeit dabei
aber vielen dank Leute das war echt nett von euch ich werde das wohl noch irgendwie hinkriegen hoffentlich bis 13 Uhr
Falls jemand mal lust hat hab es hochgeladen

Besten Dank!

Mit freundlichen Grüßen

Peter

[himitsu]

Erklärung siehe Beitrag #8 und auch von den Anderen wurde es mehrfach genannt.

Delphi-Quellcode:

// Speichern:

procedure TForm1.SpeichernClick(Sender: TObject); { der Funktions-Kopf }
var
  ...

Delphi-Quellcode:

// Lesen:

{ hier fehlt etwas ganz Wichtiges }
var
  ...

Fällt dir da ein Unterschied auf?

Der Code ist soweit gut uns theoretisch funktionstüchtig, aber er muß auch an der "richtigen Stelle" stehen.

[Speter]

ahh habs geschnallt
jetzt läuft das programm auch nur erstellt grad keine datei aber es geht schonmal an ohne Fehler

danke

[angos]

Hi,

du greifst von der Unit aus direkt auf die Radiogroup zu. Die Radiogroup selbst ist aber nur in deinem Formular deklariert.

Besser wäre, wenn du eine Neue Methode "DatenLaden" dem Formular hinzufügst und dort alles für das Laden der Daten vorsiehst. (wie schon durch DeddyH geschrieben)