[emx2000]

Можно ли искать в тексте слова различного регистра (ЗАЛАВНЫМИ/прописными буквами) объявив лишь одним способом :

объявил слова так:
DataType[1]:='INT';DataType[2]:='SHORT INT';

Нужно чтобы прога искала и 'Int' и 'int.
Жду ответа

[AlexBlack]

Можно.

строку, в которой ищем приводим к верхнему регистру, потом поиск указанных строк как обчно

[emx2000]

Тогда ещё вопрос. Подскажите код как переводить стоку к верхнему регистру если не сложно

[AlexBlack]

function UpperCase(const S: string): string;
function AnsiUpperCase(const S: string): string;



S := 'Int int';
S := UpperCase(S);

[emx2000]

Все работает. AlexBlack спасибо