Глюк

← →
Bocman © (2002-06-17 10:43) [0]

Народ може кто встречался с таким глюком:
Пишу:
nameStr:=FieldByName("nameoper").asString;
if (nameStr[1]="н") and (nameStr[2]="н") and (nameStr[3]="к") then
iStrFlag:=1;
когда namestr = "ник...." условие "проскакивается"
А вот если пришу:
nameStr:=FieldByName("nameoper").asString;
if (nameStr[1]="н") and (nameStr[2]="н") and (nameStr[3]="к") then
Showmessage(namestr);
то выполняестя....:((

nameStr:=FieldByName("nameoper").asString;
if (nameStr[1]="н") and (nameStr[2]="н") and (nameStr[3]="к") then
begin
showmessage(namestr);
iStrFlag:=1;
end;
А здесь выполняет show message, но проскакивает iStrFlag:=1;

iStrFlag : Integer;
namestr : String[20];

← →
kull © (2002-06-17 10:58) [1]

Неплохо бы сначала nameStr на пустую строку проверить, а то может и до nameStr[2] не дойти...

← →
kull © (2002-06-17 10:59) [2]

А почему не проверить так: nameStr = "ник"?

← →
Kaban (2002-06-17 11:02) [3]

2 kull
Чего привязался к человеку. Сказано же строка начинается с "ник"
но ником не заканчивается, видимо лень функцию copy использовать

Ага, лень...
а namestr точно не пустая...

Глюк Найти похожие ветки