Konsolen Anwendung: WriteLn und ReadLn in gleicher Zeile

[Meflin]

Hi,
wenn ich writeln('eingabe') und dann readln schreibe, ist die eingabe ja in einer neuen zeile. wie kann ichs machen, dass die texteingabe direkt hinter dem eingabe erfolgt?

*MFG*

[Muetze1]

Moin!

WriteLn() schreibt - wie der Name schon sagt - den Text in eine ganze Zeile. Abhilfe: Write() - der schreibt den Text auch, nur sorgt er nicht dafür, das es in einer eigenen Zeile steht.

Delphi-Quellcode:

  Write('Eingabe: ');
  ReadLn(DieEingabe);

MfG
Muetze1

[Hansa]

Delphi-Quellcode:

write ('Eingabe :');
readln (Eingabe);

[braingrenade]

Moin !

Delphi-Quellcode:

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;
var s : string;

begin
   write('Gib deinen Namen ein: ');
   read(s);
   write('Hallo '+s);
   sleep(500);
end.

Einfach nur ln weglassen !

edit : Verdammt, letzter :mrgreen:

[Meflin]

merci beaucoup!

[Hansa]

Zitat:

Zitat von braingrenade

Einfach nur ln weglassen !

edit : Verdammt, letzter :mrgreen:

Nix letzter, es ist sogar falsch. :mrgreen:

[braingrenade]

Wie ?

Bei mir hat es funktioniert als ich es so kompliliert hab. :shock:

[Meflin]

hm ich check auch nicht was er meint :?:

[neolithos]

Statt read sollte dort readln stehen

[braingrenade]

Aber es funktioniert auch mit read, was ist denn eigentlich dann der Unterschied zeischen read un d readln ?

[Luckie]

Zitat:

Zitat von braingrenade

Aber es funktioniert auch mit read, was ist denn eigentlich dann der Unterschied zeischen read un d readln ?

Wer lesne kann ist klar im Vorteil: http://www.delphipraxis.net/internal...=161520#161520 :?

[shmia]

Zitat:

Zitat von Meflin

wenn ich writeln('eingabe') und dann readln schreibe, ist die eingabe ja in einer neuen zeile. wie kann ichs machen, dass die texteingabe direkt hinter dem eingabe erfolgt?

Auf writeln und readln verzichten und stattdessen eine "CRT"-Unit verwenden.
Du wirst in die gute alte MS-DOS und Turbo-Pascal Zeit zurückgebeamed, als man
den Bildschirm noch über Spalte und Zeile angesprochen hat.
Torry's->Components->System->CRT

[braingrenade]

Hmm.. also ich hab jetzt zwei programme kompiliert:

1.

Delphi-Quellcode:

program Project1; 

{$APPTYPE CONSOLE} 

uses 
  SysUtils; 
var s : string; 

begin 
   write('Gib deinen Namen ein: '); 
   read(s); 
   write('Hallo '+s); 
   sleep(500); 
end.

2.

Delphi-Quellcode:

program Project1; 

{$APPTYPE CONSOLE} 

uses 
  SysUtils; 
var s : string; 

begin 
   write('Gib deinen Namen ein: '); 
   readln(s); 
   write('Hallo '+s); 
   sleep(500); 
end.

Und bei beiden passiert das gleiche!

Aber wenn ich

3.

Delphi-Quellcode:

program Project1; 

{$APPTYPE CONSOLE}

uses
  SysUtils;
var s : string;

begin
   write('Gib deinen Namen ein: ');
   read(s);
   write('Hallo '+s);
   write('Gib deinen Namen ein: ');
   readln(s);
   write('Hallo '+s);
   sleep(2000);
end.

kompiliere wird der Unterschied klar, wenn man read benutzt funktioniert das nur einmal, bei readln mehrmals.