[DELPHI] overriden van TCLientSOcket.onRead

[douweh]

Mijn titel is waarsch verkeerd..
Het idee is dat ik een component wil maken..
dat kan connecten met de MSN server..
Ik ga uit van een TClientSocket (dat is iig het idee)
en wil nu dus wat doen op het moment dat er wat binnenkomt vanuit de server..
soort van override van het onRead event dus....
wie kan mij uitleggen hoe ik zoiets aanpak?

[Verwijderd]

Override method Event van TCustomSocket; en dan zoiets:

code:

procedure TMySocket.Event(Socket: TCustomWinSocket; SocketEvent: TSocketEvent);
begin
  case SocketEvent of
    seRead: 
    { Doe iets }
  else
    inherited;
  end;
end;

[douweh]

Ja maar dat wil niet omdat hij aangeeft dat deze abstract is..
ik zal even kijken in de help wat ik hieraan kan doen... maar iig bedankt

[Verwijderd]

Op dinsdag 05 februari 2002 21:23 schreef douweh het volgende:
Ja maar dat wil niet omdat hij aangeeft dat deze abstract is..
ik zal even kijken in de help wat ik hieraan kan doen... maar iig bedankt

Waarschijnlijk heb je het volgende nu gedaan:

code:

TMyClientSocket=class(TClientSocket)
private
  ...
protected
  ...
public
  ...
published
  ...
end;

Beter is het om het volgende te doen:

code:

TMyClientSocket=class(TCustomSocket)
private
  ...
protected
  ...
public
  ...
published
  ...
end;

Beetje spitten in de VCL zal veel duidelijk maken!