Требуется помощь.

[Vilson]

Сообщение от Sherman

и сравнивая х.з. что (скорее всего указатель на эту самую строку) с х.з. чем (опять же с указателями на строки) в Statement, естественно этот case отработает только в ветке else

Афтор, какой результат тебе выдал этот скрипт?

procedure Init;
Var
 s: string; 
begin
 s:='проверка кейса строк работает';
 case s of
 'автор прав': ShowMessage('Sherman прав - в fs кейс со строками не работает'); 
 'проверка кейса строк работает': ShowMessage('Sherman НЕ прав - в fs кейс со строками работает'); 
 'кто здесь оО': ShowMessage('нет никого'); 
 end; 
end;

begin
                     
end.