Как вызвать Clearcommerror ?, lpStat (_ComStat)? Опции

[AlienEmperor]

Какой тип надо передать в ClearCommError (Bool ClearCommError(Handle HFile, LPDWORD lpErrors, LPCOMSTAT lpStat);

Что нужно передавать в качестве lpComStat ? При попытке использовать в качестве lpStat указатель типа: Var lpComStat:^_comStat получаем ошибку:
"types of actual and format var parameters must be identical". Так что туда ставить-то ???

P.S. в FAQ по Delphi написано так:

var ComStat: TComStat;
e: integer;
begin
if ClearCommError(Handle, e, @ComStat) then ...

Так вот, при такой системе - ошибка... Что там писать-то ????

Сообщение отредактировано: AlienEmperor - 9.03.2005 12:53

[volvo]

Какой тип надо передать в ClearCommError (Bool ClearCommError(Handle HFile, LPDWORD lpErrors, LPCOMSTAT lpStat);

Что нужно передавать в качестве lpComStat ?

P.S. в FAQ по Delphi написано так:

var ComStat: TComStat;  
e: integer;  
begin  
  if ClearCommError(Handle, e, @ComStat) then ...

Так вот, при такой системе - ошибка... Что там писать-то ????

Да, но ошибка-то не там, где ты думаешь... :no: Попробуй вот так:

var ComStat: TComStat;  
  e, Handle: THandle;  
begin  
  if ClearCommError(Handle, e, @ComStat) then ...

[AlienEmperor]

Holy shit... Я и не въехал, что e - THandle... Спасибо за ответ! Помогло!

Сообщение отредактировано: AlienEmperor - 10.03.2005 14:05