konsola

0

Jak w aplikacji konsolowej reagowac na wpisane przez uzytkownika dane ?

Bo to niedziala : :( :[

var
X: String;
begin
Writeln('who are you ??');
Readln(X);
if X =('ozyrys') then
Writeln('hello !');
end.

Czyli jezeli uzytkownik wpisze cos innego niz 'ozyrys' to program nic nie zrobi a jak wpisze 'ozyrys' to wyswietli 'hello !' --Ozyrys Pozdrawiam {hello}
Delphi 6

0

program Project2;

{$APPTYPE CONSOLE}

uses
SysUtils;
var name : String;
begin
{ TODO -oUser -cConsole Main : Insert code here }
WriteLn('Enter Your Name');
Read(name);
If name = 'b0bik' then
WriteLn('Hello my lord and master ;)');
end.

mi działą tylko trzeba wpisac b0bik : )--pozdrowienia

0

thx !! ale mi nie dziala ;( :( :[ --Ozyrys Pozdrawiam {hello}
Delphi 6

0

pomyłka !!! :-) :-) :-) :-) dziala !! blad jeden popelnilem --Ozyrys Pozdrawiam {hello}
Delphi 6

0

pewnie wpisywales b0bik : P--pozdrowienia

0

nie dobrze wpisywalem , tylko maly blad w kodzie popelnilem , niewazne...--Ozyrys Pozdrawiam {hello}
Delphi 6

0

blad... najpierw spraedz czy rzeczywiscimasz problem :P --Vroc

1 użytkowników online, w tym zalogowanych: 0, gości: 1