[angvelem]

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

...тоже не компилируется...

Не-а, F9 - компиляция с запуском. Значит компиляция работает.

[Scooby_Do]

Так то да, но сама компиляция не работает. Программа не может преобразовать эти скрипты в единный файл(программу)))

[angvelem]

Сам себе противоречишь, по F9 запускается, значит файл скомпилирован и сохранён на диск.

[Scooby_Do]

а куда он сохранен? В какую папку?

[angvelem]

По-умолчанию, если не указывал путь, в каталог "Projects" внутри каталога куда установлен Дельфи. Это для Дельфи 7. Для более старших версий - "Мои документы/RAD Studio/Projects".

[Scooby_Do]

неа, нету ни чего, кроме пректов

[angvelem]

Нажми Save As..., выведет диалог с предложением куда сохранить.

[Scooby_Do]

все, уже скомпилировалось. Слушай. Вот код:

PHP код:

procedure TForm1.Button2Click(Sender: TObject); 
Var
 i: Integer;
begin 
 n:= 1; S1:= '';
 While n <= Length(Edit1.Text) Do 
  begin 
   S:= Copy(Edit1.Text, n, 1);
   For i:= 1 To 65 Do if S = Z[i] Then S1:= S1 + M[i];
   Inc(n, 1);
  end;
 Memo1.Lines.Add(S1);
end; 


как сделать так, что бы знаки препинания не кодировались? else не работает почему-то((

[angvelem]

Можешь конечно сделать проверку на них и пропускать при нахождении, но это не совсем верно будет. Правильнее проверить код и найти в чём дело.

[Scooby_Do]

в смысле? Мне надо что бы он знаки препинания и цифры не кодировал. Исправь мой код пожлуйста))!!

[angvelem]

Давай проект целиком.

[Scooby_Do]

Вот, лови!!

[angvelem]

Как бы одного DPR-а мало, а где DFM, PAS?

[angvelem]

Тебе нужно расширить массив:

Код:

 Z : array[1..148] of String = ('а', 'б', 'в', 'г', 'д', 'е', 'ё', 'ж', 'з', 'и', 'й',
                                'к', 'л', 'м', 'н', 'о', 'п', 'р', 'с', 'т', 'у', 'ф',
                                'х', 'ц', 'ч', 'ш', 'щ', 'ь', 'ы', 'ъ', 'э', 'ю', 'я',
                                'А', 'Б', 'В', 'Г', 'Д', 'Е', 'Ё', 'Ж', 'З', 'И', 'Й',
                                'К', 'Л', 'М', 'Н', 'О', 'П', 'Р', 'С', 'Т', 'У', 'Ф',
                                'Х', 'Ц', 'Ч', 'Ш', 'Щ', 'Ь', 'Ы', 'Ъ', 'Э', 'Ю', 'Я',
                                'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k',
                                'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v',
                                'w', 'x', 'y', 'z',
                                'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K',
                                'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V',
                                'W', 'X', 'Y', 'Z',
                                '.', ',', ':', ';', '''','"', '<', '>', '{', '}', '[',
                                ']', '!', '@', '#', '%', '&', '*', '(', ')', '-', '_',
                                '=', '+', '\', '|', '/', '?', '`', '~');

и соответственно второй с подстановочными символами. А так программа нормально работает, хотя, конечно, это слишком по-детски выглядит. Если хочешь хотя бы чуть посерьёзнее, обратись к Konrad-у.

[Scooby_Do]

я попробывал его расширить, но при проверке берется два символа и так вообщем полохо получается хДД

а про посерьезней мне пока рано, я только учусь!