Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Timer funktionieren nicht (https://www.delphipraxis.net/198233-timer-funktionieren-nicht.html)

Ykcim 16. Okt 2018 16:31

AW: Timer funktionieren nicht
 
Ich habe gerade die PDF-Komponenten auf dem Form verglichen. Im ersten hatte ich noch ein OnPaint-Ereignis, indem aber nur die Procedure FormOrga aufgerufen wird. Die habe ich gerade wieder herausgenommen und jetzt funzts. Ich fürchte, damit habe ich mein Programm ziemlich beschäftigt, sodass deshalb die Timer nicht mehr gearbeitet haben.

Wie ihr schon sagtet - zu 100% ein eigener Fehler.

Vielen Dank für die Unterstützung!
Patrick

DieDolly 16. Okt 2018 16:48

AW: Timer funktionieren nicht
 
Nicht dein Programm hast du damit beschäftigt, sondern den Main-Thread. Sind auch große Unterschiede :P

Ykcim 16. Okt 2018 16:56

AW: Timer funktionieren nicht
 
Habe das Thema mit den Threads noch nicht verstanden. Ich arbeite immer nur mit dem Main-Thread...
Gibt es da eine einfache Erklärung für - ich lerne gerne...

Vielen Dank
Patrick

KodeZwerg 16. Okt 2018 16:58

AW: Timer funktionieren nicht
 
Zitat:

Zitat von Ykcim (Beitrag 1415906)
Stimmt, der Timer bleibt enabled, aber funktioniert nicht...

Übrigens, wenn die Datei nicht gefunden wird, weil sie nicht da, dann tritt der Fehler auch nicht auf. Also spielt er sich irgendwie hier ab
Delphi-Quellcode:
procedure TForm_Pinnwand.Load_PDF(PDF_Viewer: TPDFView; Datei: string);
begin
   if FileExists(Datei) then begin
      PDF_Viewer.Active:=false; // kenne das nicht aber da der eine active auf false steht sollte vielleicht der andere das auch?
      PDF_Viewer.Pdf.Active:=false;
      PDF_Viewer.Pdf.FileName:=Datei;
      PDF_Viewer.PDF.Active:=true;
      PDF_Viewer.Active:=true;
   end

siehe den edit da.


oder vielleicht gar so?
Delphi-Quellcode:
procedure TForm_Pinnwand.Load_PDF(PDF_Viewer: TPDFView; Datei: string);
begin
   if FileExists(Datei) then begin
      PDF_Viewer.Active:=true;
      PDF_Viewer.Pdf.Active:=false;
      PDF_Viewer.Pdf.FileName:=Datei;
      PDF_Viewer.PDF.Active:=true;
   end


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:17 Uhr.
Seite 2 von 2     12   

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