Необходимо прочитать файл в память, заменить один байт в нем и сохранить на диск.
Например, имея файл из 4-х байт

Нужно например заменить второй байт на FF
Чтоб получилось так:

(читать всё…)

Ставлю компонент Image, туда запихиваю файл gif, но когда запускаю проект, GIF отображается как картинка, а не анимация, почему так происходит, и встречался ли кто нибудь с подобным???

(читать всё…)

Необходимо через GDI+ в делфи 7 получить из файла формата jpg файл формата bmp. Скачал архив с GDI+, распаковал и положил 6 файлов (DirectDraw.dcu, GDIPAPI.dcu, GDIPUTIL.dcu, GDIPOBJ.dcu, DirectX, Jedi) в каталог Lib, где стоит делфи. Потом когда я получил ошибку — скопировал эти же файлы и в проект (на всякий случай), но не помогло. Пишу код:

uses
 Windows, ... jpeg, pngimage, GifImage,
  GDIPAPI, GDIPOBJ, GDIPUTIL;

procedure TForm1.Button3Click(Sender: TObject);
var
  encoderClsid: TGUID;
  Image: TGPImage;
begin
Edit1.Text:=StringReplace(Edit1.Text,ExtractFileExt(Edit1.Text),'',[]);
 if ExtractFileExt(Edit1.Text)='.jpg' then
  Image := TGPImage.Create(Edit1.Text+'.jpg');
  GetEncoderClsid('image/bmp', encoderClsid);
  image.Save(Edit1.Text+'.bmp', encoderClsid, nil);
  image.Free;

  Image2.Picture.LoadFromFile(Edit1.Text+'.bmp');
end;

При запуске сначала появляется такое предупреждение
[Предупреждение] Unit1.pas(98): Variable ‘Image’ might not have been initialized

А затем вылазеет ошибка вот в таком окне:

—————————
Debugger Exception Notification
—————————
Проект Capcha.exe вызвал исключение класса EAccessViolation с сообщением ‘Access violation at address 7C80980F in module

‘kernel32.dll’. Write of address CED6E8D3′. Процесс остановлен. Используйте Шаг или Запуск для продолжения.
—————————
OK Help
—————————

Жму ОК, выскакивает окно:

Исходник не найден GDIPOBJ.pas
Путь к файлу: GDIPOBJ.pas

Да, действительно файла GDIPOBJ.pas нет ни в папке с проектом, ни в папке Lib где стоит делфи. В то время как GDIPOBJ.dcu есть в обоих папках. Сам не знаю что думать: то ли делфи не создал GDIPOBJ.pas, то ли этот файл должен был войти в состав скачиваемого GDI+.

(читать всё…)

Из спортивного интереса решил написать алгоритм для прецизионного поворота растрового изображения на произвольный угол относительно произвольной точки поворота. Но боюсь, что изобретаю велосипед…

Много видел сообщений о то, что такой алгоритм будет очень медленный и громоздкий, но самого алгоритма никто показать не может. Может здесь кто-нибудь встречал такой алгоритм?

(читать всё…)

Извеняюсь если вопрос уже задавался но в гугле 3 страницы просмотрел там либо таймер либо MouseMove собственно вопрос в теме тоесть цель необходимо получить координаты курсора мыши относительно формы не используя таймера
А MouseMove не подходит так как у меня форма в основном на ней динамические объекты а цель получения координат мыши необходимо для отслежки в каких координатах нужно расположить динамические лейблы узнать этого нельзя так как имаджи на которых нужно разместить лэйблы размещаются динамически тоесть програмным путем темболее через массив
Вот скрин

Пока нумерация сделана через фотошоп но мне охото сделать програмно темболее она будет тогда качественее и даст пару возможностей.

(читать всё…)

Помогите разобраться со считыванием двумерного массива из потока данных. Построчно массив получается считать, а целиком нет. Что я делаю не так?

(читать всё…)

Хочу отловить ошибку из за которой моя программа зависает. Для этого в начале и конце каждой процедуры отправлять строку в мемо. Получится такой простенький лог.

(читать всё…)

Дан двумерный массив размером n*m.
1.Заменить максимальный элемент каждой строки нулем
2.Вставить перед всеми строками, первый элемент которых делится на 3, строку из нулей.
3.Удалить самый левый столбец, в котором встретиться четный отрицательный элемент.
4.Поменять местами второй и предпоследний столбцы.

(читать всё…)

Дана дата рождения и день недели на, который она попадает. Найти те даты, когда день рождения попадает на тот же день.

(читать всё…)

Как определить високосный или нет заданный год? Нужен код в Делфи.

(читать всё…)