Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#12

Re: OnCreate wird nur einmal nach Programmstart ausgeführt

  Alt 12. Aug 2007, 19:44
ist auch klar, du rufst zwar
TGrundeinstellungen.Create(Self) auf, weißt dies aber nirgendwo der Variablen "Grundeinstellungen" zu. Um es dir zu verdeutlichen:
Delphi-Quellcode:
with TGrundeinstellungen.Create(Self) do
  try
    ShowModal;
  
  if EtwasNichtErzeugtesBzwEineVariableDerNichtsZugewiesenWurde.ModalResult = mrOk then
    Datenneuladen1.OnClick(Datenneuladen1);

  finally
    Free;
  end;
wenn dann
Delphi-Quellcode:
with TGrundeinstellungen.Create(Self) do
  try
    ShowModal;
  
  if ModalResult = mrOK then
    Datenneuladen1.OnClick(Datenneuladen1);

  finally
    Free;
  end;
oder
Delphi-Quellcode:
with TGrundeinstellungen.Create(Self) do
  try
    if ShowModal = mrOk then
      Datenneuladen1.OnClick(Datenneuladen1);

  finally
    Free;
  end;
oder
Delphi-Quellcode:
var
  lFormInstance: TGrundeinstellungen;
begin
  lFormInstance := TGrundeinstellungen.Create(Self);
  try
    lFormInstance.ShowModal;
  
    if lFormInstance.ModalResult = mrOK then
      Datenneuladen1.OnClick(Datenneuladen1);

  finally
    lFormInstance.Free;
  end;
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat