Delphi-PRAXiS
Seite 2 von 5     12 34     Letzte »    

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Lauftext von rechts nach links (https://www.delphipraxis.net/177634-lauftext-von-rechts-nach-links.html)

DeddyH 18. Nov 2013 17:32

AW: Lauftext von rechts nach links
 
Delphi-Quellcode:
sndPlaySound(nil, 0);

Natcree 18. Nov 2013 17:40

AW: Lauftext von rechts nach links
 
Ja aber selbst wenn ich diesen einsetze spielt er bei 200 milsek. im timer den Sound nur einmal ab
Delphi-Quellcode:
  canvas.textout(50+i*10,50,s[i]);
  sndPlaySound(nil, 0);
  sndPlaySound('c:\delphi progs\fenster\windows navigation start.wav',SND_async);

DeddyH 18. Nov 2013 18:09

AW: Lauftext von rechts nach links
 
Dann läuft vermutlich Dein Timer zu schnell, so dass das Sound abspielen nicht mehr hinterher kommt.

Natcree 18. Nov 2013 18:27

AW: Lauftext von rechts nach links
 
kann mann da was machen????

DeddyH 18. Nov 2013 18:33

AW: Lauftext von rechts nach links
 
Keine Ahnung. Wie ist es so?
Delphi-Quellcode:
Timer.Enabled := false;
sndPlaySound(nil, 0);
canvas.textout(50+i*10,50,s[i]);
sndPlaySound('c:\delphi progs\fenster\windows navigation start.wav',SND_async or SND_FILENAME);
Timer.Enabled := true;

Natcree 18. Nov 2013 18:47

AW: Lauftext von rechts nach links
 
keine änderung hmmmm????

Natcree 18. Nov 2013 19:03

AW: Lauftext von rechts nach links
 
komisch bei menushowdelay in der registry kann man auf null setzen und er spielt es auch gut ab. wieso geht es hier nicht.

Natcree 25. Nov 2013 11:07

AW: Lauftext von rechts nach links
 
Was muss ich machen wenn Der Textout in einem Label erscheinen soll ??

Habe mal das ausprobiert passiert aber nichts

Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
var
a:String;
i:integer;
begin
  a:='Anrede';
  inc(i);
  if i > length(a)then
  begin
  timer1.Enabled:=false;
  exit;
  end;
  Label1.canvas.textout(296+i*16,50,a[i]);
end;

DeddyH 25. Nov 2013 11:20

AW: Lauftext von rechts nach links
 
Schau Dir mal den Wert von i im Debugger an, dann wirst Du merken, dass das so nicht funktionieren kann.

Natcree 25. Nov 2013 11:26

AW: Lauftext von rechts nach links
 
Var i might not have been initialized. Welchen wert muss ich denn i geben ( inc(i); ) scheint ja denn nicht zu funtionieren


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:27 Uhr.
Seite 2 von 5     12 34     Letzte »    

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