Separate names with a comma.
Заменить в полученной строке символы перевода каретки на пробелы :)
OnCloseQuery CanClose:=not(Form2.Vilible);
Я надеюсь ты двойку не в тупую переписал?
Чуваку нужна длинная арифметика. Представленные листинги на паскале умрут после 18! - проверено еще в 96 году прошлого века. to rubik-nerubik...
первую строку замени на: var aIcon:TIcon begin ImageList.GetIcon(2,aIcon); HIcon1:=aIcon.Handle; ...
если уж сильно надо использовать TTimer (я бы не стал этого делать в консольке), то можно так выкрутиться: program MyApp; {$APPTYPE CONSOLE}...
При N=1000 имеем 1 000*1 000 = 1 000 000 элементов массива для проверки. При N = 2000 -> 2 000*2 000 = 4 000 000, т.е. в 4 раза больше....