![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
GLScene AVI Recorder [Delphi, GLScene, Windows]
FRick © (2005-07-09 02:02:00)Когда происходит запись в AVI файл, полностью прекращяет свою работу GLCadencer, что делать? а после записи снова все работает!
FRick (2005-07-10 02:14:00) [1]Вот фрагмент:
else if info.strings[0] = 'saveavi' then begin
iavi:=0;
if info.count = 1 then exit;
SetCurrentDir(ExtractFilePath(Application.ExeName));
AVIRecorder1.Filename:=('screenshots\avi\'+info.strings[1]+'.avi');
str:= 'Record start "screenshots\avi\'+info.strings[1]+'.avi"';
console.AddLine(str);
if not AVIRecorder1.CreateAVIFile then Exit;
UserAbort:=false;
avi:= True;
try
while (iavi<360) and not UserAbort do begin
AVIRecorder1.AddAVIFrame;
GLCadencer.Progress;
Application.ProcessMessages;
inc(iavi);
end;
finally
AVIRecorder1.CloseAVIFile(UserAbort);
end;
avi:= False;
str:= 'Record stop';
console.AddLine(str);
end
пока все работает из консоли!
DeadMeat (2005-07-09 19:11:00) [2]Код плиз...
У меня все в норме..
---
...Death Is Only The Begining...