Вниз
Скачать: CL | DM;

String to Char   Найти похожие ветки 

 
Xmen   (2002-12-09 10:11) [0]

Привет Мастера!
Помогите Как можно сделать 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;


 
Anatoly Podgoretsky ©   (2002-12-09 10:17) [1]

Ch := St[1];

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


 
Opuhshii ©   (2002-12-09 10:27) [2]

что такое String?,
что такое Char?,.
что такое Крилица?
И срочно за буквари ....


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


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


 
Внук ©   (2002-12-09 10:37) [4]

Чиста канкретна лучше все-таки за буквари :))


 
Anatoly Podgoretsky ©   (2002-12-09 10:48) [5]

Чиста канкретна уже написан, ну раз не можешь понять, то не только срочно, а архисрочно


 
Xmen   (2002-12-09 10:52) [6]

Да ладно с вами, и на это спасибо!


 
Anatoly Podgoretsky ©   (2002-12-09 10:56) [7]

Еще и обругал, ты думаешь при таком поведении тебе вообще то будет кто либо помогать более одного раза.


 
Xmen   (2002-12-09 12:09) [8]

Еще и обругал , ты думаешь при таком поведении тебе вообще то будет кто либо помогать более одного раза.

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

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


 
Fantasist ©   (2002-12-09 23:57) [9]


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


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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c
1-61658
a3m
2002-12-07 17:17
2002.12.19
Граббёр


3-61422
Юра
2002-11-28 20:23
2002.12.19
масштабируемость DB-Grida


1-61601
olden
2002-12-06 18:56
2002.12.19
как избежать прокрутки комбобокса колесом мышки


6-61745
kkv
2002-10-23 11:10
2002.12.19
пароль на $IPS при коннекте по сети


4-61860
Dimedrol
2002-11-05 17:22
2002.12.19
Keyboard Hook




   Наверх