Also, mal wieder ein neues Problem für mich:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
| procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
var text: string;
begin
text:= Socket.ReceiveText;
if text='test' then begin
Memo1.Lines.Clear;
Memo1.Lines.Add('test2')
end
else begin
Memo1.Lines.Clear;
Memo1.Lines.Add(text);
end;
end; |
Sodalar, jetzt wird immer wenn 'test' geschrieben wird das Teil auch so ausgegeben, in allen anderen Fällen schreibt ers einfach so ins Memo.
Ich hätte jetzt allerdings gerne folgendes:
Das Programm kriegt ne Variable zugeschickt, keinen bestimmten Text, wie z.B. den Computernamen des anderen Rechners, so, nun würde ich das gerne in ein anderes Memo schreiben und auch anders behandeln, also nicht mit else begin sondern mit "if text=????"
Genau da komm ich nicht weiter, ich weis ja nicht welcher Text dann losgeschickt wird...
Wie kann ich das lösen? Hätte gerne das ich halt auch auf bestimmte Variablen reagieren kann, hab mir schon gedacht vielleicht gibts ja irgend nen Platzhalter z.B. if text='computername **' oder so, aber das scheint es ja nicht zu geben?
mfg Die Brotmafia
Moderiert von 
raziel: Code- durch Delphi-Tags ersetzt
Oder dich wenigstens mal vernünftig bedanken, wenn man dir schon hilft... aber das wird das Problem sein, schon zu verwöhnt... 
keine Angst, ändert sich ab sofort. 
