Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];




Вниз

Хитрая задачка с перебором массивов 


cdaDmitriy   (2002-03-10 11:31) [2]

for i:=1 to i3 do Begin
kill:=0;
for i2:=1 to i3 do
if (k[i]=l[i2]) then begin kill:=2; break; end;
IF (kill=0) then begin kill:=3; break; end;
End

if (kill<>3) then ShowMessage("YES!")




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.015 c
3-80429           new                   2002-02-26 10:35  2002.03.25  
Kak konetktirovat s MSSQL Server chtobi rabotal bistree?


1-80465           Starkom               2002-03-12 09:55  2002.03.25  
Как программно раскрыть выпадающий список в TComboBox?


3-80411           toorick               2002-02-26 14:08  2002.03.25  
SQL и MEMO-поля


3-80446           dr.Flex               2002-02-27 21:11  2002.03.25  
BDE 5.2 MSI Merge Module, как же эту прелесть с инсталить


1-80554           Ramill                2002-03-09 07:44  2002.03.25  
ShowMesage