Thema: Delphi randomize

Einzelnen Beitrag anzeigen

nahpets
(Gast)

n/a Beiträge
 
#7

Re: randomize

  Alt 24. Okt 2008, 19:24
Sorry muss random und nicht randomize heißen.

Aber wenn Du die Recource entpackst, solltet Du nur einen Zufall einbauen:

Delphi-Quellcode:
Var
  sZufall : string;

begin
...
  sZufall := 'test' + IntToStr(Random(15) + 1);
  rStream := TResourceStream.Create(hInstance, sZufall, RT_RCDATA) ;
  fname := ExtractFileDir(Paramstr(0))+sZufall + '.mp3';
...
  Mit Zitat antworten Zitat