AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Timer ohne Form

Ein Thema von Jan · begonnen am 11. Okt 2003 · letzter Beitrag vom 12. Okt 2003
Antwort Antwort
Seite 2 von 2     12   
Benutzerbild von Jan
Jan

Registriert seit: 24. Sep 2002
Ort: Magdeburg
491 Beiträge
 
Delphi 7 Enterprise
 
#11

Re: Timer ohne Form

  Alt 11. Okt 2003, 23:55
Vielleicht mach ich ja wirklich was falsch, hier der code der unit:
Delphi-Quellcode:
unit main;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls,shellapi, extctrls;

 var
  MyTimer: TTimer;
implementation

{$R *.DFM}

uses STNDGenPlug;

procedure timerevent(sender:tobject);

var
handle:hdc;
title:string;
begin
handle:=getdc(0);
settextcolor(handle, clyellow);
SetBkmode(handle, TRANSPARENT);
title := strpas(Pointer(sendmessage(Plugin.HWNDparent, wm_user,
                             SendMessage(Plugin.HWNDParent, wm_user, 0, 125),212)));
textout(handle,100,100,pchar(title),length(title));
releasedc(0, handle);
end;

begin


  MyTimer := TTimer.Create(nil);
  MyTimer.Enabled := True;
  MyTimer.Interval := 500;
  @MyTimer.OnTimer := @timerevent;



end.
Gruß
Jan
Jan
Wenn die Sonne der Kultur tief steht, werfen auch kleine Gestalten lange Schatten.
  Mit Zitat antworten Zitat
Daniel B
(Gast)

n/a Beiträge
 
#12

Re: Timer ohne Form

  Alt 11. Okt 2003, 23:57
Und wo ist die Nachrichtenschleife die Luckie vorhin schon angesprochen hat?
  Mit Zitat antworten Zitat
Benutzerbild von Jan
Jan

Registriert seit: 24. Sep 2002
Ort: Magdeburg
491 Beiträge
 
Delphi 7 Enterprise
 
#13

Re: Timer ohne Form

  Alt 11. Okt 2003, 23:59
Zitat:
Wenn du SetTimer nutzt, dann brauchst du nämlich wieder eien MessageLoop oder wie willst du sonst an die WM_TIMER nachrichten dran kommen?
Wenn ich Settimer benutze, aber das tu ich ja nicht.
Gruß
Jan
Jan
Wenn die Sonne der Kultur tief steht, werfen auch kleine Gestalten lange Schatten.
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

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

Re: Timer ohne Form

  Alt 12. Okt 2003, 00:04
Die Nachrichtenschleife bezieht sich ja nicht auf TTimer!! Bleibt wohl bezüglich TTimer nur noch ne Hilfsklasse um das hinzubekommen.
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#15

Re: Timer ohne Form

  Alt 12. Okt 2003, 00:07
Verdammt, wir hatten das doch schon mal. Und ich meine, da hätten wir es so gelöst.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


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 12:32 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz