Forum: Sonstige Fragen zu Delphi
Delphi
by Neutral General,
2. Aug 2004
ach ich weiß woher es kommt :
if Key = #13
da fügt er das drücken auf die Entertaste noch hinzu ... wenn ich nämlich z.b #32 (Leertaste) als Taste benutze, funktioniert es :wall:
Forum: Sonstige Fragen zu Delphi
Delphi
by Neutral General,
2. Aug 2004
eigentlich nicht, weil der 2. String ja das ist, was man eingegeben hat...
Und außerdem beim ersten mal funktioniert es ja ...
Dann wäre ja beim ersten mal #13#10 nicht dabei, aber danach schon ... :gruebel:
Forum: Sonstige Fragen zu Delphi
Delphi
by Neutral General,
2. Aug 2004
da war schon wordwrap := false und ich füge auch keine zweimal was hinzu ... :(
procedure TForm1.EingabeKeyPress(Sender: TObject; var Key: Char);
var st : String;
begin
st := Eingabe.Text;
if Key = #13 then begin
Richedit1.Lines.Add(Nickname + ' : ' + st);
Eingabe.Text := '';
end;
Forum: Sonstige Fragen zu Delphi
Delphi
by Neutral General,
2. Aug 2004
Ich ändere gar nichts... Ich hab als anhang mal ein Bild wie es aussieht ...
Forum: Sonstige Fragen zu Delphi
Delphi
by Neutral General,
2. Aug 2004
Also ich füge eine neue Zeile zu einem Richedit hinzu :
Richedit1.Lines.Add(String1 + ' : ' + String2);
Das Programm ist eine Art Chat und wenn ich dann etwas eingebe dann erscheint es das erste mal richtig :
'Mein Name : Das was ich geschrieben hab'
aber beim nächsten mal sieht es so aus