Нужно решить задачу на Делфи. Дана последовательность чисел: 1 56 12 30 5 (числа могут быть любыми, пробелы тоже учитываются) Надо упорядочить эту последователдьность по убыванию
Доброе время суток, Андрей! Непонятен вопрос. Вы ничего не знаете об алгоритмах сортировки или испытываете трудность с вводом и преобразованием чисел? Ответ отправлен: 08.11.2004, 06:16 Отправитель: sir henry Отвечает Vet
Здравствуйте, Андрей! Предполагаю последовательность в виде массива, т. к. не сказано, в каком виде она дана: procedure Sort1(var Values: array of integer); var i,j,TempValue: integer; begin for i:=Low(Values) to High(Values)-1 do for j:=i+1 to High(Values) do if Values[j]>Values[i] then begin TempValue:=Values[i]; Values[i]:=Values[j]; Values[j]:=TempValue; end; end; Ответ отправлен: 08.11.2004, 15:04 Отправитель: Vet
Вопрос № 1909
По поводу ответа на вопрос 1894. Получилось следующее: 1. После скачивания и установки нового BDE с сайта Borland\'a С++ Builder по-прежнему не захотел открывать файл и индексами. 2. После выкачивания (у меня качается очень плохо, поэтому матов было сложено много) патча С++ Builder наконец-то открыл файл FoxPro 2.6 for DOS без всяких лишних действий с моей стороны. Спасибо, про патч я не знал.
Доброе время суток, Alexandr! Пожалуйста. :) Ответ отправлен: 08.11.2004, 06:18 Отправитель: sir henry
Вопрос № 1910
Здравствуйте, уважаемые эксперты. Подскажите, пожалуйста, как можно сделать такую вещь средствами C++ Builder 6, чтобы было примерно так: пользователь ожидая завершения каких-нибудь проверок его данных видит такую картину - появляются строки, описывающие, что проверяется и если проверка завершилась успешно, показывается, например, зеленая галочка, если что-то было неправильно - красный кружок. Я не придумал ничего лучше, как поместить несколько Label'ов и рядом с ними в 2 раза больше Image'й - и если все правильно - показываю Image с зеленой галочкой, если неправильно - с красным кружком. Но преподаватель, которому надо сдать контрольную, эти операторы в программы выделил и сказал, что надо оптимизировать. Подскажите, пожалуйста, как можно такое оптимизировать. Заранее благодарен за ответы.
Здравствуйте, Alexandr! Попробуй создать ImageList, в который вставить рисунки для правильного и неправильного вариантов. И создай ListView, в который помести список проверяемых данных. Для каждого пункта устанавливаешь нужный индекс... Ответ отправлен: 08.11.2004, 19:35 Отправитель: Alex
Вопрос № 1911
Здравствуйте уважаемые эксперты! Подскажите как мне правильно закрыть Excel. Создаю так: XLApp:= CreateOleObject('Excel.Application'); Закрываю: XLApp.Quit; XLApp:=Null; Перед закрытием в лист Excel'я вносятся изменения, сохранять которые не нужно. Но корректно закрывается только вместе с программой, А если после этого опять открыть, не закрываю прогу, то Excel начинает глючить В XP офисе просит перезапустить, а в 2000 просто вылетает ошибка. И при таком закрытие 'excel' остается висеть в процессах.
Доброе время суток, Александр! Я вот не понял, Вы в Дельфи работаете или в Билдере. Дикое смешение стиля: ":=" - это Дельфи "Null" - это Билдер. Для выхода из Excel вполне хватает и Quit. Ответ отправлен: 08.11.2004, 13:22 Отправитель: sir henry Отвечает Vet
Здравствуйте, Александр! Насчёт Quit'a - у меня XP и не глючит. Попробуй XLApp.Workbooks.Close; Чтоб Excel не задавал вопрос о сохранении документа: XLApp.DisplayAlerts:=false.
Ответ отправлен: 08.11.2004, 23:06 Отправитель: Vet
Форма отправки вопроса
Внимание!
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+
или отправлять вопросы с сайта по адресу:
http://rusfaq.ru/cgi-bin/Message.cgi.