Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.27;
Скачать: CL | DM;

Вниз

Поиск   Найти похожие ветки 

 
SpyX ©   (2003-01-18 21:56) [0]

Возник вопрос. Допустим у меня есть массив:
mas : array[1..10] of string;
и например
mas[3] := "delphimastak"
Как мне организовать поиск, по...ну например "as", чтобы возвратилось значение 3?


 
Николай Быков ©   (2003-01-18 22:16) [1]

а без as никак?
вот есть простой способ

type mas=array[1..10]of string;
...................
function find(x:mas; s:string):integer;
var
i:integer;
begin
for i:=1 to 10 do
begin
if x[i]=s then find:=i;
exit;
end;
end;



 
Yuri-7 ©   (2003-01-18 22:20) [2]

for i:=1 to 10 do
begin
if Pos(mas[i],"as") <> 0 then
Result:=i;
break;
end;


 
Николай Быков ©   (2003-01-18 22:21) [3]

ааа!! вон вы про что.
а я подмал, что не "as", а as



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

Текущий архив: 2003.01.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.028 c
7-87171
maxim2
2002-11-14 13:58
2003.01.27
Не могу добавить прогу в автозапуск через реестр


14-87033
Snake2000
2003-01-10 17:21
2003.01.27
Заработок в Интернет


3-86727
Asderg
2003-01-09 14:40
2003.01.27
определение своего TDataSet


1-86924
Chainik
2003-01-16 14:27
2003.01.27
Подскажите как можно сделать доступным выбор сетевого окружения.


14-87088
Rigman
2003-01-08 04:46
2003.01.27
Что будет с процессором, если его CPU часами держать 100%