Автор Тема: Вопрос по Делфи  (Прочитано 634 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Elven Raider Автор темы

  • Эксперт
  • *****
  • Сообщений: 1186
  • Зарегистрированный
    • Music.Vault
Вопрос по Делфи
« : Апреля 07, 2006, 21:01:33 »
Необходимо функцией Ord возвратить аски код из string переменной.
Но Ord воспринимает только Char переменные.

Вопрос: Как из String перегнать в Char?

Оффлайн Desperado

  • Новичок
  • *
  • Сообщений: 20
Re: Вопрос по Делфи
« Ответ #1 : Апреля 07, 2006, 22:49:01 »
var
  s: string;
  c: char;
begin
  s := '12345';
  c := s[1]; //в с получаем первый символ - '1'
end;

Оффлайн Elven Raider Автор темы

  • Эксперт
  • *****
  • Сообщений: 1186
  • Зарегистрированный
    • Music.Vault
Re: Вопрос по Делфи
« Ответ #2 : Апреля 08, 2006, 08:39:33 »
Спасибо, все получилось

Оффлайн Keeper

  • Завсегдатай
  • ***
  • Сообщений: 257
  • Шкодер
Re: Вопрос по Делфи
« Ответ #3 : Апреля 08, 2006, 08:44:09 »
var cod,i: integer;
    s: string;
begin
  for i:=1 to length(s) do
  begin
    cod:=Ord(s);
    // тут творишь с кодом что хочешь
  end;
end;