Forum: Programmieren allgemein
by BadenPower,
23. Mär 2015
Der 2.Parameter in hathor's Beispiel bei SetTimer() sollte auch nicht 1, sondern 0 sein.
Denn wenn ein Timer mit der ID = 1 exestieren würde, dann würde dieser mit den neuen Werten überschrieben werden und kein neuer Timer erzeugt.
procedure TForm1.Button1Click(Sender: TObject);
begin
id1 := SetTimer(0, 0, 2000, @MyTimer); Memo1.Lines.Add('id1:' + INTTOSTR(id1)); //2000msec
id2 :=...
Forum: Programmieren allgemein
by BadenPower,
22. Mär 2015
Einmal abgesehen davon, dass die Aussage falsch ist, hätte man dennoch als Antwort die Code-Änderung posten können, welche dann die angebliche richtige Lösung enthalten würde.
So ist es halt nur wieder das übliche BlaBla.
Forum: Programmieren allgemein
by BadenPower,
20. Mär 2015
Nachdem ich durch Deinen Post #10 nicht mehr ganz sicher wahr, ob mein Erinnerungsvermögen nicht doch im Stich gelassen hatte, habe ich das getan, ws wir immer und immer wieder predigen und die Delphi-Wunderwaffe gezückt, in dem ich die F1-Taste betätigt habe.
Das Ergebnis war das, welches ich gepostet habe.
Dies entspricht allerdings inhaltlich nicht exakt dem, welches ich aus Deinem Link zu...
Forum: Programmieren allgemein
by BadenPower,
19. Mär 2015
Selbst erstellen:
MyTimer := TTimer.Create(Self);