Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

String to Char [D5, Win95/98, Win2k]

Xmen © (2002-12-09 10:11:00)
Привет Мастера!
Помогите Как можно сделать String to Char.
Я хотел написат код который если находет в строке знаки крилицы то дал бы сообщене.
Кусок кода

var
ls,t:integer;
st:string;
ch:char
--------------
ls:= length("здес текст");
for t:=1 to ls do
begin
st:=copy("здес текст",t,1);
ch:=(st)
if ord(ch)>192 then
begin
ShowMessage("Крилица");
end;
end;

Fantasist (2002-12-09 23:57:00) [1]

> Anatoly Podgoretsky © (09.12.02 10:56)
> Еще и обругал,

Действительно, Аnatoly, тут с суждением вы поспешили. Человек все сказал вполне корректно.

Xmen (2002-12-09 12:09:00) [2]
Еще и обругал , ты думаешь при таком поведении тебе вообще то будет кто либо помогать более одного раза.

Спасибо!
Спасибо!
Спасибо!
Спасибо!
Спасибо!

Это вед не руганя-же?
Или я ошебаюсь.

Anatoly Podgoretsky (2002-12-09 10:56:00) [3]
Еще и обругал, ты думаешь при таком поведении тебе вообще то будет кто либо помогать более одного раза.

Xmen (2002-12-09 10:52:00) [4]
Да ладно с вами, и на это спасибо!

Anatoly Podgoretsky (2002-12-09 10:48:00) [5]
Чиста канкретна уже написан, ну раз не можешь понять, то не только срочно, а архисрочно

Внук (2002-12-09 10:37:00) [6]
Чиста канкретна лучше все-таки за буквари :))

Xmen (2002-12-09 10:31:00) [7]

Без >>И срочно за буквари ....
можете конкрето пример написать.

Opuhshii (2002-12-09 10:27:00) [8]
что такое String?,
что такое Char?,.
что такое Крилица?
И срочно за буквари ....

Anatoly Podgoretsky (2002-12-09 10:17:00) [9]
Ch := St[1];

И срочно за буквари по Паскалю

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »