AGB  ·  Datenschutz  ·  Impressum  







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

Timer in Klassen mehrmals verwenden.

Ein Thema von fabgo · begonnen am 1. Okt 2006 · letzter Beitrag vom 2. Okt 2006
 
fabgo
(Gast)

n/a Beiträge
 
#9

Re: Timer in Klassen mehrmals verwenden.

  Alt 2. Okt 2006, 11:03
ja, jetzt habe ich es genau so gemacht, wie in dem genannten thread...

wenn ich aber jetzt auf meinen Button klicke, kommt ein Zugriffsfehler.


meine definierte Klasse:
Delphi-Quellcode:
type
  TWindradTimer = class (TTimer)
  public
    constructor Create (AOwner:TComponent);override;
    procedure OnTimerEvent(Sender:TObject);
end;
Delphi-Quellcode:
constructor TWindradTimer.Create (AOwner:TComponent); // timer wird erstellt
begin
  Timer1.Enabled:=True;
  Timer1.OnTimer:=OnTimerEvent;
  inherited Create (AOwner);

end;

procedure TWindradTimer.OnTimerEvent(Sender:TObject);
begin
  x2:=x2+1;
  with Form1.Image1.Canvas do begin
    MoveTo(5,5);
    LineTo(x2,5);
  end;
end;
Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Timer1:=TWindradTimer.Create(Form1);
end;
  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 01:07 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 by Thomas Breitkreuz