запись видео в районе курсора

[Fahman]

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

хочется 1 ехе без длл.

а какая разница? пусть лежат библиотеки)) Или это ты спарить кому то хочешь?)))))))))))

[mitiay]

Решил сделать сам!))В общем план таков делать снимки экрана,сохранять и потом конвертировать в в ави (jpg to avi);Вот как то так)Теперь загвостка первая

 b: TBitMap;
begin
b:=TBitMap.Create;
 GetRS(b,ExtractFilePath(Application.ExeName) + '1.jpg');
 b.Free;

Как сделать чтоб сохранялось 1,2,3,4.....

[Stilet]

var num:integer;
...
 b: TBitMap;
begin
b:=TBitMap.Create;
 GetRS(b,ExtractFilePath(Application.ExeName) + InttoStr(num)+'.jpg'); inc(num);
 b.Free;

[mitiay]

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

var num:integer;
...
 b: TBitMap;
begin
b:=TBitMap.Create;
 GetRS(b,ExtractFilePath(Application.ExeName) + InttoStr(num)+'.jpg'); inc(num);
 b.Free;

Он присваивает случайное число к имени но почему к одному файлу.То есть каждый скрин перезаписывает с новым именем а как сделать чтоб новый скрин сохранялся под другим именем(то есть нажал 5 раз на кнопку появилось 5 файлов .jpg)

[Пепел Феникса]

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

Он присваивает случайное число к имени но почему к одному файлу.То есть каждый скрин перезаписывает с новым именем а как сделать чтоб новый скрин сохранялся под другим именем(то есть нажал 5 раз на кнопку появилось 5 файлов .jpg)

этот код так и делает.
появится пять файлов, 0.1.2.3.4

[mitiay]

Сообщение от Пепел Феникса

этот код так и делает.
появится пять файлов, 0.1.2.3.4

Нет он создает один файл 4364600.jpg и перезаписывает его

[phomm]

var num:integer;

Должно быть объявлено глобальными переменными (сразу до или сразу после IMPLEMENTATION), а не локальными (в процедуре)
А ещё лучше взять учебник и почитать, чтобы не задавать глупых вопросов по каждой запятой.

[Stilet]

Должно быть объявлено глобальными переменными

Дау ж )))
Надо было написать - "Не совать в локально"

[denis76560]

Зачем делать через задницу ? Я давал вам линк.
Вы даже не потрудились модули в гугле найти, спецом для Вас перезаливаю.
Хотя может уже не актуально, но может другим понадобится.
http://rghost.ru/59265644