Командная строка в паскале

[xwicked]

Сообщение от Snapper

можешь ссылку кинуть на freepascal..plz

Лови: http://downloads.sourceforge.net/pro...mirror=citylan Последняя версия .

[Snapper]

uses crt;
label metka;
var s:string; n,i:integer;
begin
 if ParamCount < 1 then begin
     WriteLn('Error...'); halt(1);
      end;
     s:=paramstr(1);
  n:=length(s);
  for i:=n downto 1 do
  s[i]:=LowCase(s[i]);
    writeln(s) ;readln;
end.

тока без Удалятеля... но почему не ПАШЕТ??? прошу откомпеллируйте и покажите пожалуйста результат..прошу исправте если где-то не правильно...
я на грани отчаяния..хотя еще 4е лабы делать((((
p.s:делал через нормалный PASCALABC.NET так что должно быть правильно...
использовал его птомучто freepascal не определял lowCase....

[xwicked]

Сообщение от Snapper

uses crt;
label metka;
var s:string; n,i:integer;
begin
 if ParamCount < 1 then begin
     WriteLn('Error...'); halt(1);
      end;
     s:=paramstr(1);
  n:=length(s);
  for i:=n downto 1 do
  s[i]:=LowCase(s[i]);
    writeln(s) ;readln;
end.

тока без Удалятеля... но почему не ПАШЕТ??? прошу откомпеллируйте и покажите пожалуйста результат..прошу исправте если где-то не правильно...
я на грани отчаяния..хотя еще 4е лабы делать((((
p.s:делал через нормалный PASCALABC.NET так что должно быть правильно...
использовал его птомучто freepascal не определял lowCase....

uses crt;
label metka;
var s:string; n,i:integer;
begin
 if ParamCount < 1 then begin
     WriteLn('Error...'); halt(1);
      end;
     s:=paramstr(1);
  n:=length(s);
  for i:=n downto 1 do
  s[i]:=LowerCase(s[i]);
    writeln(s) ;readln;
end.

я на грани отчаяния..хотя еще 4е лабы делать((((

В правилах написано - проявляйте юридическую хладнокровность к таким-вот словам . Это лишнее.
Ответ - зелёным .

[Snapper]

Да дело даже не в регистре...paramstr правильно оформил???

[xwicked]

Две зелёные буквы добавь и всё. FreePascal проверил!!! Код рабочий!!!

[Snapper]

выходит такая ошибка что делать???

[Serge_Bliznykov]

у Вас случаем не Vista/Window Seven ?!

Похоже нет прав на запись файла в C:\Program Files\fpc\bin\ ....

попробуйте перенести исходник куда-нибудь в C:\FPC ...
или в настройка FPC покопайтесь, чтобы он файлы генерил в папку, куда права есть..

[Snapper]

так и есть у меня семерка...
переделал... терь прога в c:\FPS
но после компиляции он должен выдать мне ярлык???

оне мне выдал ярлык, но запуская его, то он мгновенно загружается..не успев толком ничего показать...

[Serge_Bliznykov]

но после компиляции он должен выдать мне ярлык???

не-а.. не должен..
проверьте, в этом каталоге должен появится Ваш exe-шник..
<ИмяПРограммы>.EXE
его запустите из командной строки, дописав Ваш параметр...

[Snapper]

А как дописать то???