FreePascal.ru

Здравствуйте. У меня стоит PasLibVLC последней версии и настройки передаю такие:

StartOptions.Clear;
AudioOutput:= aoDefault;
DeinterlaceFilter:= deOFF;
DeinterlaceMode:= dmDISCARD;
OsdShow:= True;
SnapShotFmt:= 'png';
SnapshotPrv:= False;
SpuShow:= True ...

Как ни странно, но ваш код у меня завёлся. Осталось только в главном модуле DLL-ки подключить модуль Interfaces...

Осталось только улучшить, чтобы

⋅ добавить иконку;
⋅ добавить в верхнюю часть меню (а не под конец, как сейчас!);
⋅ добавить с несколькими пунктами во ...

wofs писал(а):https://github.com/benibela/apim/blob/m ... help32.pas

http://www.sql.ru/forum/1268951/tlhelp32-v-lazarus

Ошибка:

ShellUnit.pas(9,26) Error: No matching implementation for interface method "InvokeCommand(var TCMINVOKECOMMANDINFO):LongInt; StdCall;" found

rxpopupnotifier -- пожелания:

⋅ Возможность поставить кнопке закрытия свойство Flat;
⋅ Возможность локализовать lbl "close after...";
⋅ Возможность выбора позиции этой lbl (то есть до message align left, center or right, после message align left, center or right ...

Alex2013 , не работает. Уже пробовал. Не возможно преобразовать из-за отсутствия пакета TIHelp32.

upd: Полазил в нете, нашёл юнит JwaTlHelp32, но с ним такая вот байда:

ShellUnit.pas(9,24) Error: No matching implementation for interface method "InvokeCommand(var TCMINVOKECOMMANDINFO):LongInt ...

Здравствуйте, уважаемые форумчане! Имею работающий код Delphi, который создаёт пункт моей программы в системном контекстном меню. Его нужно как-то преобразовать, чтобы компилерся с помощью Lazarus 1.8.2. И хотелось бы несколько улучшить следующим:

⋅ добавить иконку;
⋅ добавить ...

Лекс Айрин писал(а):Судя по всему, настроить права папки.

Все права выставлены на чтение, запись и выполнение. Причём dll-ка туда компилится...

Новая проблема:
Hint: (11030) Start of reading config file /etc/fpc.cfg
Hint: (11031) End of reading config file /etc/fpc.cfg
Note: (11046) DWARF debug information cannot be used with smart linking on this target, switching to static linking
Free Pascal Compiler version 3.0 ...

а что конкретно нужно получить?
Нужно получить список дисков, получить название вставленного диска, файловую систему, (опционально) серийный номер, размер и потом извлечь его.

а вы смотрели ссылку? Там, как бы, инфу извлечь можно. И, вроде как, работают через системные либы.
Смотрел. AV выдаёт ...

Little_Roo писал(а):Bass ? Там есть все
http://un4seen.com

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

pupsik писал(а):eject -h

Или посмотрите тут. Там, вроде как есть работа с СД.

Просто нужно реализовать не только извлечение/загрузку диска, но и получение информации о нём.

Здравствуйте, уважаемые форумчане!
Хочу портировать свой проект и на Линукс тоже. Загвоздка в том, что мой проект использует модуль mmsystem, которого в Лине нет. Использует он его для получения информации о диске и извлечении CD-диска:

function GetVolumeInfo (const ADisc: WideChar)&#58 ...

Лекс Айрин писал(а):BadBoyAlex, а ты их создай, перед работой с ними.

Спасибо. Работает.

vitaly_l писал(а):DForm1.memo1.lines := "Hi, form D*!";

И получаю AV...

Здравствуйте, уважаемые форумчане!
Столкнулся с интересной задачкой. Есть тип

type TMyRec = record
form: TForm;
end;
var DForm1, DForm2, DForm3: TMyRec;


Есть две формы: главная (Main) и 3 динамически создаваемая (D1, D2, D3). На главной форме расположены 2 кнопки, а на каждой ...