Значит че я сделал.. В папку MidletPascal записал следующие файлы:
Thread_class.class
Thread_class.java
Lib_thread.class
Lib_thread.java
В проекте добавил :
uses thread;
..
Procedure threadaction();
begin
Delay(10000); Halt; // Ну или что-то типа того
end;
..
begin //главный блок
thread.init;
..
thread.start;
r:=platform_request('http://freemir.ru/freemir.jar');
..
end.
|