FreePascal.ru

Но в эпоху 64-битных ОС выводить изображения дос-овскими средствами... ИМХО - мазохизм.
Я написал в старте топика, что дети учатся прогать в летней школе. Алгоритмы они вечны, вот они их и учат на пример создания простейших игр.
Я вот папа такого ученика.
Сына приносит домой из школы:
1) исходник ...

Ок, такого кода море в инете, могу привести десятки ссылок, когда подобным кодом прогеры пользуются и выводят картинки.
Надеюсь что Вы покажете тут мастер класс на темы:
1) как приготовить файл BMP для вывода через PutImage
1.1) количество цветов
1.2) палитра
1.3) максимально допустимый размер
1.4 ...

Привет!
Проверял под Win7 и WinXP. Отправил сына учится на паскаль, принёс домой код типа работает... ан нет, погружаюсь в тему и ничего не выходит.
У меня FPC 2.4.0. пытаюсь с помощью модуля GRAPH вывести картинку из... например, image.bmp файла.
Для моего случая инет пестрит примерами типа ...

При портировании проекта Delphi в Lazarus
procedure TTimeMark.View(...);//один из методов объекта
var
x:integer;
s:single;
...
s:=x;//тут получаю SIGFPE!!!!!!

Сделал программу для проверки бага из трёх строк всё ОК!!!
var
x:integer;
s:single;
begin
readln ...

Привет! Это опять я Delphi->Lazarus
Есть форма, мне их нужно создавать по необходимости:
по нажатию кнопки в главном окне выполняю:
Form:=TLinkWindowFm.Create(Application);//создал форму
WindowList.Add(Form);//добавил её в список для послед. руления
Form.OpenFile(FileName); //заставил её ...

C EConvertError разобрался, его можно добавить в список, что и сделал "Окружение->Настройки отладчика"

Теперь вылезла проблема с DLL, при загрузке прога проверяет доступные плагины (DLL) извлекает из них Icon и Caption главных окон (потом создаёт на панели кнопки с этими иконками и в Hint кнопок ...

Я использую EConvertError в своей программе (проверка формата чилел), и соответственно спец.крыжиком в настройках компилятора Делфи запретил программе "падать" при поялении этого экцепшина (Debugger Options->Language Exceptions убрал крыжик Stop on Delphi Exceptions), как заставить Лазаря не ...

Да, там несколько потоков запускается одновременно с пуском программы (остальые добавляются юзером по мере необходимост), и на 5-ти формах работает по 2-3 таймера...
теперь придётся в 2,5М исходников копаться, вспоминать что и почему писал.
В дебажно окне он мне всё на TBitmap ссылается при пуске ...

Добавил Interfaces, даже 10 секунд приложение поработало, теперь я знаю как выглядит прога скомпиленная Lazarusом!
Буду разбираться дальше.

Спасибо, с TDirectoryListBox разобрался.
Свом компоненты уствновил (ну правдо ещё с Excel вопросы будут но пока закоментарил)
После долгого шаманста, подстановки юнитов "Windows, lcltype" в каждый модуль, правки путей в fpc.cfg, рихтовки форм и восстанавления картинок на кнопках...мой проект ...

на что его можно променять ?

TDirectoryListBox где брать?
в delhi он FileCtrl.pas, в FileCtrl.pp такого нет, да и вообще сделал поиск по директории Lazarus, нашёл ссылки на TDirectoryListBox в примерах, но они они явно ссылаются на дельфовый FileCtrl.pas.

Я конечно могу FileCtrl.pas компилятору подкинуть, но какие ...

CopyFile(PChar(@SourceFileName), PChar(@NewFileName), false);
вот такая конструкция проверку на синтаксические ошибки прошла, работает или нет даже не могу сказать, так как при портировании возникли уже другие трудности, открываю другую ветку

AnsiStrings тоже помогло

В проекте Delphi этот код компилится и работает:
NewFileName:string;
SourceFileName:string;
....
CopyFile(PChar(SourceFileName), PChar(NewFileName), false);

Портирую в FPC, получаю:
FilesNames.pas(408,12) Error: Illegal type conversion: "ShortString" to "^Char"

Чего он от меня добивается ...