vielen dank, es funktioniert!
habe mich gründlich hier umgeschaut, finde allerdings keine lösung für ein anderes Problem:
innerhalb einer klasse habe ich in objekt der klasse TServerSocket erstellt.
Jetzt weiss ich nur nicht, wie ich die Ereignisroutine OnClientRead dort unterbringen soll...habe versucht es auf eine klasseninterne Prozedur umzuleiten, klappt aber nicht (incompatible types)
eigentlich müsste es doch so klappen:
Quelltext
1: 2: 3: 4: 5:
| var serv: TServerSocket; begin serv.OnClientRead:=MeineRoutine; end; |
hoffe mir kann jemand helfen
mfg
cirrus