October 8th, 2004, 02:06 PM
Most likely it is something to do with the Socket code. This code works fine:
procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
SendString : string;
if Key = #13 then
SendString := Memo1.Lines[Memo1.Lines.Count - 1];
When I do this, the message shows up which proves that the code is being triggered when I hit the enter key. I'm pretty certain your problem is elsewhere, but without seeing your code, I cannot tell you where it is.
Up the Irons
What Would Jimi Do? Smash amps. Burn guitar. Take the groupies home.
"Death Before Dishonour, my Friends!!" - Bruce D ickinson, Iron Maiden Aug 20, 2005 @ OzzFest
Down with Sharon Osbourne