FreePascal.ru

Лекс Айрин писал(а):

ANTIKLAN писал(а): Но я сделал так что из 64-битной версии можно компилировать в 32-бит.

угу... а не проще ли выставить в проекте 2 режима компиляции -- win32 и win64? И компилировать потом одновременно.

Это уже другая тема...

pupsik писал(а):

Все работает... Профит!

пакеты пробовали установить, модуль из фпс "тянуть"???

Не проще ли два лазаря поставить но с различными каталогами настроек?

Мне кажется когда все в одной среде так проще особенно когда проектов много.

DYUMON писал(а):Там же на сайте где лазарь скачивают есть специальные инсталяторы для 32 и 64 бита.

Это да. Но я сделал так что из 64-битной версии можно компилировать в 32-бит.

Как я решил проблему. Поставил на виртуальную машину Lazarus 32-bit и оттуда выдернул все что нужно:

Lazarus32\lcl\units\i386-win32(копируем всю папку в Lazarus64\lcl\units\)
Lazarus32\fpc\3.x.x\units\i386-win32(копируем всю папку в Lazarus64\fpc\3.x.x\units\)
Lazarus32\fpc\3.x.x\bin\i386-win32 ...

Всем привет. Подскажите пожалуйста какие настройки выставлять в проекте для того чтобы откомпилировать приложение в Lazarus 1.6 на Windows 64-бит под Windows 32-бит чтобы потом все правильно у всех работало.

В общем разобрался я =) По описанию в Wiki FreePascal. Вот ссылка: http://wiki.freepascal.org/Show_Application_Title,_Version,_and_Company
Теперь мой код должен быть таким:
procedure TAboutForm.FormCreate(Sender: TObject);
var
FileVersionInfo: TFileVersionInfo;
begin ...

ANTIKLAN , я привел в прошлом посте полностью работоспособный пример, выдранный из работающей проги. Единственное замечание по нему это модуль main -- его включение придется убрать. Не доглядел.
Если не собираешься играться с положением элементов, то просто вставляй к себе. Если собираешься, то ...

Я посмотрел исходник и посмотрел список изменений для Lazarus 1.6 там говорится что теперь надо делать через ReadFileInfo. Вот выдержка из текста:
TVersionInfo (fileinfo unit) re-implemented in a platform independent way
Old behaviour: GetVersionSetting method would read file information.
New ...

Всем привет!
Обновился на Lazarus 1.6 и перестала работать в процедуре эта строка: AboutVersionLabel.Caption := 'Версия: ' + FileVersionInfo.getVersionSetting('FileVersion');
Ошибка выдаваемая при компиляции: Error: identifier idents no member "getVersionSetting"

Вот сама отказавшая процедура ...

Вот именно приложение я еще до нового года в декабре написал и оно работает и локализацию сделал и сайт для размещения клиента подготовил. Все готово проблема в том чтобы разделить мое приложение на сервер и клиент. Знаю что нужно вынести на сервер, но видите не знаю как это сделать.

Ума не ...

почти упал со стула
Чего падать то вы же не перевели точно. Я и так понимаю что там "может законектимся" и т.д. написано. Мне нужен детальный разбор выражения был. Чтобы я мог сам его построить, а не скопировать.

Неужто это не заказ?
Нет конечно. Я пытаюсь реализовать свою идею.

Так не пойдет ...

Как перевести на человеческий язык вот такие условия:
Вы веткой не ошиблись?
Может надо было в: "Помощь за вознаграждение"???
Что то мне говорит что вы взялись за деяние не совместимое с вашими знаниями.

п.с.
Приблизительный перевод:
if FNet.Connect(EditIP.Text, StrToInt(EditPort.Text)) then ...

Мне все равно не понятно. Можно по шагам на примере например библиотеки lnet расписать как добавить клиенту функции отправки данных на сервер и как на сервере их принять и обработав отправить назад. Чем проще будет схема тем лучше. И с подробными комментариями каждой строчки кода и команд. А то я ...

Мне все равно не понятно. Можно по шагам на примере например библиотеки lnet расписать как добавить клиенту функции отправки данных на сервер и как на сервере их принять и обработав отправить назад. Чем проще будет схема тем лучше. И с подробными комментариями каждой строчки кода и команд. А то я ...

Есть ли у кого нибудь пошаговое руководство как сделать клиент и сервер для работы через интернет? Вообще непонятно как такое делать.