chr(5)

← →
Нуб (2007-03-15 16:07) [0]

у меня есть str : string , как можно проверить каждый элемент str на наличие в нем chr(5) пробовал написать типа что-то этого
for i:=1 to StrLen(c) do begin // opredelyaem koli4estvo ya4eek if strcomp(PChar(chr(5)),PChar(chr(ord(str[i])))) = 0 then kol4isel := kol4isel + 1; end;
ругается во время выполнения выпадает еррор типа Access бла бла бла , напишите плиз где я допустил ошибку !!

← →
Reindeer Moss Eater © (2007-03-15 16:08) [1]

Проще сказать где ты не допустил ошибки.

← →
Сергей М. © (2007-03-15 16:09) [2]

for i := 1 to Length(str) do
if str[i] = Chr(5) then
Inc(kol4isel);

← →
Сергей М. © (2007-03-15 16:11) [3]

> Нуб (15.03.07 16:07)

Любопытно, для кого предназначены эти идиотские комментарии в идиотском же транслите ?)

← →
Desdechado © (2007-03-15 16:11) [4]

Pos + F1

for i:=1 to StrLen(c) do
begin
if strcomp(PChar(chr(5)),PChar(chr(ord(str[i])))) = 0 then

Не говоря уже о применении за каким-то лешим функций для нултерминэйтед строк.

← →
Нуб (2007-03-15 16:16) [6]

chr(5) Найти похожие ветки