Есть некая процедура RasCallback

← →
Nexel (2004-12-14 14:32) [0]

Есть некая процедура Procedure RasCallback(msg: Integer; state: TRasConnState; error: Integer); stdcall; она вызывает состояние текущего dial-up соединения так вот когда я законнектился и пытаюсь вызвать процедуру типа TfmSend.Button3Click(Sender: TObject); то прога вешается насмерть вот процедурка сама вся

Procedure RasCallback(msg: Integer; state: TRasConnState;
error: Integer); stdcall;
Begin
MyDialParam.AMsg:=msg;
MyDialParam.AState:=state;
MyDialParam.AError:=error;
If error<>0 Then
Begin
Try
fmSend.ListBox1.Items.Add(".......");
fmSend.Button3Click(fmSend.Button3);
Except
End;
End
Else
If GetStatusString(MyDialParam.AState,MyDialParam.AError)="....." Then
Begin
fmSend.ListBox1.Items.Add(GetStatusString(MyDialParam.AState,MyDialParam.AError));
//ТУТ ОНА И ВЕШАЕТСЯ
fmSend.BitBtn1Click(fmSend.BitBtn1);
End;

End;

← →
Nexel (2004-12-14 14:47) [1]

Нашел я в чем причина, дело в том, что процедура BitBtn1Click открывает форму с отображением процесса обработки данных... отключив ее появление все заработало... но вопрос встречный... как ее открыть чтобы приложение не повеслиось?

Есть некая процедура RasCallback Найти похожие ветки