Einzelnen Beitrag anzeigen

Benutzerbild von CreativeMD
CreativeMD

Registriert seit: 11. Okt 2011
127 Beiträge
 
Delphi XE2 Architect
 
#20

AW: Label Text ändern aus einem Thread heraus

  Alt 27. Sep 2014, 10:46
Hm, das ist verwirrend,
also es ist die gleiche Form, aber eine andere Instanz (nach meiner Vermutung),
aber ich greife auf die richtige Variable zu:
Delphi-Quellcode:
const
  WM_AFTER_SHOW = WM_USER + 300;
type
  ThreadClass = class of TThread;
  TOverviewF = class(TForm)
    lvInstances: TListView;
    mmMenu: TMainMenu;
    Settings1: TMenuItem;
    Logger1: TMenuItem;
    BugReport1: TMenuItem;
    MinecraftAccounts1: TMenuItem;
    Changelog1: TMenuItem;
    lblVersion: TLabel;
    N1: TMenuItem;
    CheckForUpdates1: TMenuItem;
    SendanEMail1: TMenuItem;
    lblInformation: TLabel;
    lblRetry: TLinkLabel;
    cmdProgressBackground: TCMDProgressBar;
    lblTaskBackground: TLabel;
    btn1: TButton;
    procedure Logger1Click(Sender: TObject);
    procedure FormShow(Sender: TObject);
    procedure WmAfterShow(var Msg: TMessage); message WM_AFTER_SHOW;
    procedure lblRetryClick(Sender: TObject);
    function createThread(thread : ThreadClass) : TThread;
    procedure setEnabled(Enabled : Boolean);
    procedure btn1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  OverviewF: TOverviewF;
  BackgroundThread : TBackgroundThread;
Auf OverviewF, da bin ich mir sicher. Aber wo ist dann der Fehler :O


EDIT

In den Einstellungen (wo man das Hauptformular bestimmen kann) gibt es zwei Forms mit dem Namen OverviewF :O.

Das Problem ist gelöst nach ein paar mal hin und her klicken funktioniert es nun endlich , die eine Form ist dann irgendwann verschwunden. Vielen Dank für eure Hilfe

Geändert von CreativeMD (27. Sep 2014 um 10:55 Uhr)
  Mit Zitat antworten Zitat