Вопрос № 82727: Здравствуйте, Уважаемые эксперты! Меня интересует вопрос, каким образом объявляются динамические массивы в процедурах.
При таком объявлении:
procedure minor(i,j:integer;var a:array of array of integer);
Возникает ошибка
[Error] Unit...Вопрос № 82778: Здравствуйте уважаемые эксперты.
Я только начал изучать Delphi поэтому сразу порошу прощения за глупый вопрос!
Мне нужны обьекты "сервер" и "клиент" с вкладки "интернет" как мне туда их устоновить.Если можно раск...Вопрос № 82782: сБЮФЮЕЛШЕ ЩЙЯОЕПРШ! оНДЯЙЮФХРЕ ОНФЮКСИЯРЮ (ФЕКЮРЕКЭМН МЮ ОПХЛЕПЕ), ЙЮЙ ЩЙЯОНПРХПНБЮРЭ НОПЕДЕКЕММСЧ БЕРЙС Б ПЕЕЯРПЕ. йНПМЕБНИ ПЮГДЕК ПЕЕЯРПЮ - HKEY_CURRENT_USER. Уважаемые эксперты! Подскажите пожалуйста (желательно на примере), как э...Вопрос № 82809: Здраствуйте.
Как заставить Delphi работать с модемом, висящем на COM1....Вопрос № 82829: Здраствуйте.
Я пишу программу тестирования которая состоит из нескольких отделных тестов, по структуре тесты одинаковые равное кол-во вопросов и ответов, находяться они в файлах *.ini, каждый тест в отдельном файле. Возникла проблема после прохо...
Вопрос № 82.727
Здравствуйте, Уважаемые эксперты! Меня интересует вопрос, каким образом объявляются динамические массивы в процедурах.
При таком объявлении:
procedure minor(i,j:integer;var a:array of array of integer);
Возникает ошибка
[Error] Unit2.pas(34): Identifier expected but 'ARRAY' found
Вообще возможно объявить не используя указатели?
При использовании массивов в качестве параметров необходимо использовать типизированные переменные, вот в этом и ошибка.
Вам необходимо использовать такой подход:
type DinMas=array of array of integer; {описание типа}
.......
procedure minor(i,j:integer;var a:DinMas);
begin
SetLength(a,3); {процедура для установления размерности}
SetLength(a[0],3); {задаем длину каждого столбца}
SetLength(a[1],3);
SetLength(a[2],3);
........
end;
Good Luck!!!
--------- Господь Бог - это всего лишь сверхмощный генератор случайных чисел, в соответствии с которыми сочетаются события на Земле. Генератор случайных чисел - и только.
Ответ отправил: Gh0stik (статус: Профессионал) Украина, Славянск Организация: Славянский государственный педагогический университет (Кафедра алгебры) ICQ: 289363162 ---- Ответ отправлен: 16.04.2007, 00:49 Оценка за ответ: 5 Комментарий оценки: Большое спасибо! Вы мне очень помогли. Я долго думал как решить эту проблему.
Вопрос № 82.778
Здравствуйте уважаемые эксперты.
Я только начал изучать Delphi поэтому сразу порошу прощения за глупый вопрос!
Мне нужны обьекты "сервер" и "клиент" с вкладки "интернет" как мне туда их устоновить.Если можно раскажите поподробнее.
Отвечает: Павлов Сергей Сергеевич
Здравствуйте, Smotrakov sacha!
Нажмите вверху кнопку Component----->Install Packages...
В открывшемся окне нажмите кнопку ADD
Зайдите в папку...../Delphi/Bin и выберите файл dclsockets70
затем нажмите Открыть и жмите кнопку OK
Ответ отправил: Павлов Сергей Сергеевич (статус: 1-ый класс)
Ответ отправлен: 16.04.2007, 14:42
Уважаемые эксперты! Подскажите пожалуйста (желательно на примере), как экспортировать определенную ветку в реестре. Корневой раздел реестра - HKEY_CURRENT_USER. Edited by Gh0stik
Отправлен: 16.04.2007, 13:20
Вопрос задал: Bee.line (статус: Посетитель)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)
procedure TForm1.Button1Click(Sender: TObject);
var
Reg: TRegistry;
begin
//Создали объект TRegistry
Reg:= TRegistry.Create;
//Установили корневым ключом HKEY_CURRENT_USER
Reg.RootKey:= HKEY_CURRENT_USER;
//Выбрали ветвь 'SoftwareGExperts' и сохранили ее в файл 'Reg.reg'
Reg.SaveKey('SoftwareGExperts', 'Reg.reg');
end;
--------- Знания - сила!
Ответ отправил: Spawn (статус: 2-ой класс)
Ответ отправлен: 16.04.2007, 13:50
Отвечает: Gh0stik
Здравствуйте, Bee.line!
Возможен еще один вариант.
Вам достаточно воспользоваться всего одной командой:
WinExec('cmd /k reg export "HKCU" c: empegexport.reg',SW_HIDE); {экспортируем корневой раздел в файл regexport.reg}
либо WinExec('cmd /k reg export "HKCUSoftwareMicrosoftWindows" c: empegexport.reg',SW_HIDE); {экспортируем ветку HKCUSoftwareMicrosoftWindows в файл regexport.reg}
Good Luck!!!
--------- Господь Бог - это всего лишь сверхмощный генератор случайных чисел, в соответствии с которыми сочетаются события на Земле. Генератор случайных чисел - и только.
Ответ отправил: Gh0stik (статус: Профессионал) Украина, Славянск Организация: Славянский государственный педагогический университет (Кафедра алгебры) ICQ: 289363162 ---- Ответ отправлен: 16.04.2007, 13:53
Вопрос № 82.809
Здраствуйте.
Как заставить Delphi работать с модемом, висящем на COM1.
Отправлен: 16.04.2007, 16:44
Вопрос задал: Alxx (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: PGM
Здравствуйте, Alxx!
Открыть порт (CreateFile('com1')), сконфигурировать его по скорости и т.п (SetCommState) и посылать ему AT команды (ReadFile/WriteFile).
P.S. Вопрос поставлен слегка обще. Если чисто модемное соединение нужно, то так, а если дозвонка к провайдеру, то это уже установление сетевого соединения и надо двигаться с стороны сетевого API.
Ответ отправил: PGM (статус: 5-ый класс)
Ответ отправлен: 17.04.2007, 00:20
Вопрос № 82.829
Здраствуйте.
Я пишу программу тестирования которая состоит из нескольких отделных тестов, по структуре тесты одинаковые равное кол-во вопросов и ответов, находяться они в файлах *.ini, каждый тест в отдельном файле. Возникла проблема после прохождения первого теста никак немогу заставить начинать второй, а потом и третий тест. Какими способами это можно сделать. Или предеться для каждого теста форму создавать? Вся обработка теста идет через кнопку при её нажатии.
Отвечает: Zolton007
Здравствуйте, Diman Soldatov / DES!
Согласен с тем, что вопрос не очень понятен. Но:
Я бы создал класс теста. Каждый новый тест был бы новым объектом со своими данными (считанными из файла), т.е. экземпляром класса. Можно даже по прохождению теста просто уничтожать объект старого теста и создавать новый.
Тогда проблем не возникло бы даже теоретически ;)
Попробуйте так. Удачи. BYE.
--------- Если твоя программа выполняет мистические действия, - значит ты сделал что-то невероятно тупое!
Ответ отправил: Zolton007 (статус: 10-ый класс)
Ответ отправлен: 16.04.2007, 20:18 Оценка за ответ: 4
