Есть объект, объявленный как:

TMyManager = class
MyConnecttion: TMyConnection;
procedure ButtonOKPressed(Sender: PControl; var Mouse: TMouseEventData);
public
Constructor Create(AParent: PControl);
Destructor Destroy;
end;

TMyConnection выглядит так:

TMyConnection = class
private
GetSAddrSocket: PAsyncSocket;
ConSocket: PAsyncSocket;
MajorVer,
MinorVer,
Ver: Cardinal;

ServerAddr: String;
ServerPort: String;
public
function GetStatusName(Status: Cardinal): String;

constructor Create;
destructor Destroy; override;
//
end;

Дык вот, при использовании такого события, внутри TMyManager:

procedure TMraManager.ButtonOKPressed(Sender: PControl; var Mouse: TMouseEventData);
begin
MyConnection.ChangeStatus($00000002);
end;

получаю Runtime Error, но если метод этого класса не вызывать, а допустим просто MsgOk('1'), то все нормально

так а MyConnection создан? и что за ChangeStatus

Да, MyConnection создан в Project1.dpr, вот так:



ChangeStatus это метод, который принимает на входе Cardinal и меняет статус согласно ему (программа - IM messenger)

Что-я намудрил, вобщем TMRAManager = TMyManager

ну так надо трейсить ChangeStatus

с ченджстатусом все нормально (ставлю брекпоинт на первую строку в этом методе - до нее не доходит, ошибка вылазиет до)

> Фунтик ©   (12.04.08 13:32) [2]

А где тут создание MyConnection?

Фунтик, если ошибка идет до то скорее всего к тому момент класс еще не создан, код из твоего 2-ого поста когда выполняется то?

Спасибо всем, проблема решена