sfd
Embarcadero Delphi 10.4 установка компонента TComPort (RS232)
Добрый день уважаемые читатели! Сегодня разберем пример установки библиотеки по работе с последовательным портом. Перед установкой необходимо скачать компонент TComPort и распаковать архив в папку с установленной программой Delphi: Далее запускаем среду разработки приложений Delphi 10.4 и переходим во вкладку Tools - Options: Далее в "Library path" указываем путь к папке "Source" из только что распакованного архива:...
Запуск первой копии программы вместо второй в Delphi
Искал на просторах Интернета решение задачи запуска первой копии программы вместо второй. Трудно пришлось. Но всё-таки после тщательного анализа и опробования многих предложений вот что получилось: {------------} program arm_usi_tcp; uses Forms, Windows, ..... , Messages, main in 'main.pas' {Form1}, ........ {$R *.RES} var hMutex: THandle; hwndPrev: HWND; begin HMutex := CreateMutex (nil, True, 'svc_arm_usi_tcp'); if WaitForSingleObject (hMutex, 0) <> wait_TimeOut then begin {------первый запуск программы} Application.Initialize; Application.HelpFile := ''; Application...