История изменений
Исправление slackwarrior, (текущая версия) :
$ [s]dumpbin.exe[/s] objdump $QT_LIBNAME.so > /dev/mosk
????
$ cat /dev/mosk | /dev/hands > $QT_LIBNAME.pas :)
cat $QT_LIBNAME.pas
unit <$QT_LIBNAME>;
interface
procedure qtSomething1(const paramSomething:string); stdcall; external name ‘qtSomething1’;
…
procedure qtSomethingN(const paramSomething:string); stdcall; external name ‘qtSomethingN’;
implementation
end.
PROFIT!!!
А если ты даже в паскальные заголовки для cpp либ не умеешь, то… зачем тебе разрешение? :)
Исправление slackwarrior, :
$ [s]dumpbin.exe[/s] objdump $QT_LIBNAME.so > /dev/mosk
????
$ cat /dev/mosk | /dev/hands > $QT_LIBNAME.pas :)
cat $QT_LIBNAME.pas
unit <$QT_LIBNAME>;
interface
procedure qtSomething1(const paramSomething:string); stdcall; external name ‘qtSomething1’;
…
procedure qtSomethingN(const paramSomething:string); stdcall; external name ‘qtSomethingN’;
implementation end.
PROFIT!!!
А если ты даже в паскальные заголовки для cpp либ не умеешь, то… зачем тебе разрешение? :)
Исправление slackwarrior, :
$ [s]dumpbin.exe[/s] objdump $QT_LIBNAME.so > /dev/mosk
????
$ cat /dev/mosk | /dev/hands > $QT_LIBNAME.pas :)
cat $QT_LIBNAME.pas
unit <$QT_LIBNAME>;
interface procedure qtSomething1(const paramSomething:string); stdcall; external name ‘qtSomething1’;
…
procedure qtSomethingN(const paramSomething:string); stdcall; external name ‘qtSomethingN’;
implementation end.
PROFIT!!!
А если ты даже в паскальные заголовки для cpp либ не умеешь, то… зачем тебе разрешение? :)
Исправление slackwarrior, :
[code] $ [s]dumpbin.exe[/s] objdump $QT_LIBNAME.so > /dev/mosk
????
$ cat /dev/mosk | /dev/hands > $QT_LIBNAME.pas :)
cat $QT_LIBNAME.pas
unit <$QT_LIBNAME>;
interface procedure qtSomething1(const paramSomething:string); stdcall; external name ‘qtSomething1’; … procedure qtSomethingN(const paramSomething:string); stdcall; external name ‘qtSomethingN’;
implementation end.
PROFIT!!!
[/code]
А если ты даже в паскальные заголовки для cpp либ не умеешь, то… зачем тебе разрешение? :)
Исходная версия slackwarrior, :
$ [s]dumpbin.exe[/s] objdump $QT_LIBNAME.so > /dev/mosk
????
$ cat /dev/mosk | /dev/hands > $QT_LIBNAME.pas :)
cat $QT_LIBNAME.pas
unit <$QT_LIBNAME>;
interface procedure qtSomething1(const paramSomething:string); stdcall; external name ‘qtSomething1’; … procedure qtSomethingN(const paramSomething:string); stdcall; external name ‘qtSomethingN’;
implementation end.
PROFIT!!!
А если ты даже в паскальные заголовки для cpp либ не умеешь, то… зачем тебе разрешение? :)