![]() |
хелп ламосу с инициализацией обьекта!
comm321:=TCommPortDriver.create(ЧТО ТУТ ПИСАТЬ?);
если constructor TCommPortDriver.Create( AOwner: TComponent ); begin inherited Create( AOwner ); ..... END; :o |
там писать параметры Create()
|
ОК А НУ ТИПА NIL//
ХРЕН С НИМ . function StartCom(mn:integer):integer; export;stdcall; begin if Comm321=nil then begin if Comm321=nil then begin Comm321:=TCommPortDriver.create(nil); end; comm321.connect; if (mn=1) and (comm321.connect=true )then begin comm321.Connect; StartCom:=1 end else StartCom:=0; end; exports StartCom name 'u'; так вот візіваемая длл нерабоет |
обьект вроде иннициализирован , врде все доолжно работать,
свойства я проставил(ну толке не показал). Че деалть відает в процессе отладки что не передаеться значение в візіваемую функцию |
| Время: 12:34 |