[poli-smen]

Сообщение от Dmitry_DM

То-есть сделать так:

Код:

procedure WriteWav(Sender: TObject);

или так:

Код:

procedure WriteWav(FileName, fmOpenReadWrite);

Так:

Код:

procedure WriteWav(const FileName: String);