FreePascal.ru

скалогрыз писал(а):

Des писал(а):тогда получается все события Onclick и тд придется обрабатывать на OpenGLСontrol?

получать в OpenGLControl передавать в перекрытый контрол.... это плохо?

геморно в моем случае

в Windows - да, потому что OpenGL пляшет от DC, а все WinControl-ы, этот самый DC имеют.

В других системах врят ли, потому что OpenGL обычно является неким "исключением".
Обычно это реашется, выводом OpenGL поверх нужно контрола.
тогда получается все события Onclick и тд придется обрабатывать на ...

можно ли нарисованное с помощью opengl вывести на канву не OpenGLControl1, а любого другого компонента?

кто нибудь знает как отловить нажатие на заголовок формы в лазарус linux?

Кто нибудь знает как получить список шрифтов в Unix в лазарусе? такой же который выводится в tfontdialog

Я запускал прямо из под лазаруса. Однако только что попробовал запустить мышкой и все рабоает,после Application.terminate в 1 версии вторая не закрывается, спасибо
Хорошо.
Тогда попробуй ещё запускать обновлённую версию без форка, а напрямую через fpexecv.

Тестируй вне Лазаруса (либо в лазарусе ...

красота.
поменяй строчку

FPSigaction(SIGTERM, @act, nil);

на

FPSigaction(SIGKILL, @act, nil);


а ты v1 из консоли запускаешь или щелчком мышки?

Добавлено спустя 2 часа 6 минут 24 секунды:
возвращаясь к вопрос изначальному.
а запуск свежего исполнительного файла через fpexecv БЕЗ форка ...

Очень интересно. давай посмотрим кто прибивает v2

program v1;

{$mode objfpc}{$H+}

uses
{$IFDEF UNIX}cthreads,{$endif} ctypes, SysUtils, Classes, BaseUnix;
var
LastError : string = '';

function FileCopy(const src, dst: string): Boolean;
var
d: TFileStream;
s: TfileStream ...

у меня получается автоматически прибить дочерный процесс только по принуждению

program v1;

{$mode objfpc}{$H+}

uses
{$IFDEF UNIX}cthreads,{$endif} ctypes, SysUtils, Classes, BaseUnix;
var
LastError : string = '';

function FileCopy(const src, dst: string): Boolean;
var
d&#58 ...

скалогрыз писал(а):

Des писал(а):у меня все работает именно как в моей программе, как только в верссии 1 делаю Application.Terminate закрывается и версия 1 и версия 2

хм, а что за линукс такой?

Может настройки шелла/терминала какие-то хитрые?!

Rosa Desktop Fresh R6

да, все как у тебя, за исключением копирования, копирую по своему. старый deletefile('v1'), потом новый renamefile('v2','v1')
дочерний процесс не прибивается за просто так.

в аттаче пример GUI-ёвого приложения, которое после update-а вызывает(себе) Application.Terminate и всё работает, как ...

Я так понимаю новая версия приложения это будет дочерний процесс? потому что когда я делаю application.terminate у меня закрываются оба приложения и версия 1 и версия 2. Как закрыть тогда первое приложение?
а ты вторую версию через FpExecv() запускаешь?
да, все как у тебя, за исключением ...

Работает, без каких либо проблем

вот программа 1

program v1;

{$mode objfpc}{$H+}

uses
{$IFDEF UNIX}cthreads,{$endif} SysUtils, Classes, BaseUnix;
var
LastError : string = '';

function FileCopy(const src, dst: string): Boolean;
var
d: TFileStream;
s: TfileStream;
a&#58 ...

Я хочу сделать чтобы после обновления программа закрывалась и запускалась уже новая, скаченная с базы, версия файла, но в линуксе при этом запускается старая версия т.к. он запускает файл не с диска, а у себя из памяти. Кто нибудь знает как это обойти и запустить именно с диска?

qivi писал(а):Сейчас правда на работе, так что проверил только под винду... вот это работает:

не работает такой вариант на линкусе