AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein GUI-Design mit VCL / FireMonkey / Common Controls Delphi Exception beim ausblenden von Labels auf einem Tabsheet
Thema durchsuchen
Ansicht
Themen-Optionen

Exception beim ausblenden von Labels auf einem Tabsheet

Ein Thema von DelphiManiac · begonnen am 20. Sep 2007 · letzter Beitrag vom 20. Sep 2007
 
DelphiManiac

Registriert seit: 5. Dez 2005
742 Beiträge
 
#1

Exception beim ausblenden von Labels auf einem Tabsheet

  Alt 20. Sep 2007, 09:31
Hallo ich habe folgendes Problem, und ich weiss nicht wie ich es lösen soll:

Ich habe eine Anwendung die mehrere Tabsheets beinhaltet, diese sind ohne Passwort ersteinmal
disabled. Dazu habe ich ein Label 'Gesperrt' auf dem Tabsheet liegen.

Also folgender Fall:

die Tabsheets werden freigegeben und die Labels werden ausgeblendet. Genau da tritt eine Exception auf...

folgender Quellcode:

Delphi-Quellcode:
(*******************************************************************************
  Wechsel vom Worker in den ReadOnly Mode und umgekehrt
  --> shouldLock = true
      --> ReadOnly aktiv
  --> shouldLock = false
      --> Worker aktiv
*******************************************************************************)

procedure TfrmMain.LockTabs(shouldLock: Boolean);
// Sperrt oder Entsperrt den Zugriff auf die Tabs
begin
  try
    tabGeraeteDaten.Enabled := NOT(shouldLock);
    tabKalibrierung.Enabled := NOT(shouldLock);
    tabAnalogAusgang.Enabled := NOT(shouldLock);
    tabExcel.Enabled := NOT(shouldLock);
    tabSonstiges.Enabled := NOT(shouldLock);
    lblGesperrt1.Visible := shouldLock;
    lblGesperrt2.Visible := shouldLock;
    lblGesperrt3.Visible := shouldLock;
    lblGesperrt5.Visible := shouldLock;
    lblGesperrt7.Visible := shouldLock;
    if tabDatalogging.Visible then
    begin
      lblGesperrt6.Visible := shouldLock;
    end;
  except
    ShowMessage('Fehler beim Freischalten der Anwendung');
  end;
end; // of procedure TFrmMain.LockTabs(shouldLock: Boolean);
////////////////////////////////////////////////////////////////////////////////
Ich habe einen Backgroundtask am Laufen, der Daten von der Schnittstelle holt und diese auch selbst über Synchronize an die Labels der Tabsheets weitergibt, könnte dort das Problem liegen?
EDIT1: Tritt aber auch ohne Backgroundtask auf (Exception im Anhang)
Irgendwie weiß ich nicht wo genau dort das Problem liegt??

Danke schonmal

Gruß
DelphiManiac
Angehängte Grafiken
Dateityp: gif excep_115.gif (4,1 KB, 14x aufgerufen)
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:33 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz