» Вопросы по Delphi

amsancho
А пробовал ли устанавливать на 98-ю соответсвующие машине драйвера памяти? Общеизвестно, что если памяти больше 512-и для милениум, а для 98 сам понимаешь. То у машины едет математика. Она просто думает, что это отрицательное число и считает что дополнительной памяти несуществует. Попробуй запустить другие программы, например фотошоп. Если он не работает, значит придётся диск форматировать

ShIvADeSt
Я имел ввиду только для теста.

Pinocchio
Английская корпоративная версия со всеми последними апдейтами, которыя я интегрирую в дистрибутив в момент их выхода.

amsancho
Какой memory manager пользуешь? стандартный?
если да то попробуй заменить на что нибудь типа FastMM http://fastmm.sourceforge.net

Всем привет! А где можно достать дистрибутив? Дайте ссылку, плз.........

ShIvADeSt

Цитата:

стрипать все ресурсы на предмет графики? ИМХО маразм, так как тогда откуда потом глифы брать и прочие вещи.

ну наверное стоит задуматься а чего уменя там в экзешнике дублируется, и немного ручками поработать?. Согласись что один набор иконок используемый в 3-х и более формах так и напрашивается на оптимизацию? а там наверняка больше чем один набор глифов дублируется.

Кроме того возможно что он все формы делает автосозданием. А там ресурсы кончались и при гораздо меньших размерах. Вполне вероятно что ему не хватает Хендлов. Там правда сообщение что out of resources или подобное, давно сталкивался, не помню.

Если честно чего там можно напихать в 20Мб кода? Вон система учета работает на 3-х филиалах, в офисе, туча форм, логика довольно сложная, есть приличный кусок математики, не полностью оптимизирована, и то занимает чуть меньше 2,8 Мб. А тут 20.

Furon

Цитата:

А где можно достать дистрибутив?

Дистрибутив чего? Если чего то платного, тогда бегом в варезник, если бесплатного, спрашивай здесь, но осторожно или лучьше поиском пользуйся (не только по этому сайту).

Pinocchio

Цитата:

Что за зверь такой XPsp2ProEnuCorp?
У меня WinXP Professional sp2

Корп это тоже самое что и Professional только не требует активации. Есть в русском, английском и других исполнениях. Подробности рассказать где искать? Или раздел на букву "В", с номером 35 и двумя твоими постами сам найдешь? ;)

vserd
Мне Dephi нужен........восьмой

amsancho
Я бы для начала поставил на вин98 делфю и откомпилил проект на ней. Тогда экзешник, если откомпилится, должен гарантировано работать.

Furon

Цитата:

Мне Dephi нужен........восьмой

Цитата:

Если чего то платного, тогда бегом в варезник

Ваше решение?

pridecom
vserd
Спасибо, незнал. Копирайты на XP только до 2002-го видел...

Цитата:

не работает на XPsp2ProEnuCorp до момента установки второго обновления delphi

После апдейтов рушится навигация по sourсe\vсl6, для меня это не выход.

All
Вопрос такой, что стыдно спрашивать. Каким образом для акций ТАctionМanager-а указывать, что акция дефолтная для локального меню, т.е. хочется чтобы жирным шрифтом была.

amsancho
1. Возьми инструмент, какой под рукой найдется и посмотри, сколько ресурсов твоя программа лопает, поскольку в W98 есть ограничения и на количество хэндлов, и на максимум памяти вообще, да и файловая система тоже ограничение имеет. Грубо говоря - захотел файл больше 2 ГБ - обломись, Оперативки - вроде больше 1 Гб и т.п.
2. Может помочь обновление контролов ОС (comctrl-чего-то там) - установи IE с номером побольше - он это сделает. Я например на клиенте лечил именно так. Т.е. формально нужен был всего лишь MDAC 2.7, а по факту начинало работать только после дополнительного накатывания IE5.01 и больше. Хотя программа весит не 20 Мб. Она столько со справочниками ест. И то не сразу. А на W2000/XP все сразу работает.

Pinocchio
Цитата:

дефолтная для локального меню

TMenuItem.Default чем не устраивает?
Если я правильно понимаю назначение TAction, это просто способ группировки кода для обработки интерфейса. Куда конкретно ты назначишь акцию, и назначишь ли вобще, TAction не знает, значит такого свойства не имеет.

amsancho
Пиши в личку или bob_smit@ukr.net, поговорим. Подобная проблемма решается в несколько заходов в зависимости от наличия у тебя времени. Удачи.

vserd
Не вижу я чего-то никакой связи между компонентом TMenuItem и контролами модуля ActnMenus. Так понимаю что класс TActionManager предназначен для работы визуальных компонентов обеспечивающих поддержку XP стилей и офисных элементов. Акции в этом случае выполняют функцию генераторов соответствующих наборов данных, которые пользователь воспринимает как акции. А способа реализации кода найти немогу.

Приветствую всех. У меня такой вопрос: есть программа которая общается с серваком в инете по HTTP протоколу. Методы GET и POST Как можно сделать, чтобы ответ на запрос я мог получать по желанию? Тоесть в некоторых случаях мне нужна возвращаемая страничка, в других - нет.
Зараенее спасибо за помощь.

Admin CSB
Можно ограничить получаемый RANGE в том случае, если сервер это поддерживает.
В заголовке запроса написать, например,

Цитата:

Range: bytes=0-10

А если не поддерживает, можно, получив хоть что-нибудь в ответ, закрыть сокет и дальше не читать, никто ведь не заставляет считывать всю страницу.

Может, другие что-нибудь умнее подскажут.

MrZeRo

Цитата:

А если не поддерживает, можно, получив хоть что-нибудь в ответ, закрыть сокет и дальше не читать, никто ведь не заставляет считывать всю страницу.

Не в курсе как это реализовать применительено к Indy HTTP ???

Admin CSB
На Indy HTTP нельзя (без модификации исходных текстов ), только на "чистых" сокетах.

Пишу программу для работы с БД MS SQL. Использую ADO.

В общем, мне нужно узнать как загнать connection_string в некую константу, доступ к которой будут иметь все остальные формы приложения.

И еще: при запуске приложения должна происходить аутентификация пользователя. После успешной аутентификации хотелось бы тоже загнать все данные пользователя (т.е. есть таблица users с полями id, name, email, phone) в глобальный ассоциативный массив или объект.

Не подскажете как это делается (задается глоб. константа, задается глоб. массив)?

Спасибо.

PS: с Дельфи работал очень мало, но кое-какие понятия имеются.

MrZeRo

Цитата:

На Indy HTTP нельзя (без модификации исходных текстов ), только на "чистых" сокетах.

Идеи по модификации есть? А так же где почитать про реализацию такой специфической задачи на чистых сокетах?

Admin CSB

Цитата:

Идеи по модификации есть?

Заглянуть в файл IdHTTP.pas. Сам не модифицировал, врать не буду, но по-видимому можно это сделать, там много виртуальных методов, которые можно переопределить в своем наследнике от TIdCustomHTTP.

Цитата:

А так же где почитать про реализацию такой специфической задачи на чистых сокетах?

Основной источник информации по протоколу HTTP - на hxxp://www.w3c.org.
А чтобы попроще - взять любой менеджер закачки, например, RegetDX, запустить закачку и посмотреть в журнале, какие запросы он посылает, и сделать то же самое у себя. Или сниффер поставить и выловить запросы на сервер.

Компоненты можно брать любые - TClientSocket, TIdTCPClient, ... , какие найдешь.

По программированию сокетов - в поставку Delphi (по крайней мере, Delphi 7) входит пример чата, начать с изучения его работы, более подробно - в инете масса примеров.

Добавлено:
Farkhad
1. Создать Unit, расположить там эти константы в разделе interface, подключать его к модулям, в которых эта информация нужна.
2. Разместить константы на главной форме приложения в разделе public.

Для хранения параметров можно использовать класс TParams из модуля DB.pas.

Модуль:

Цитата:

unit MyUnit;
interface
var
MyParams : TParams;
implementation
initialization
MyParams := TParams.Create(nil);
finalization
MyParams.Free;
end;

Еще идеи есть? Или может кто-нибудь знает компонент в котором реализованы такие возможности?

Еще вопрос: БД из Access в Interbase конвертировать тяжело? Какие есть для этого компоненты/комбинации компонентов?
Ситуация такая - есть, грубо говоря, записная книжка в Access, ее нужно сделать сетевой. Вот, думаю написать на Делфе клиента под Интервасю.

Admin CSB
Тебя что именно интересует, перенос данных из акцеза в Интер или создание интерфейса. если первое, то создавай точно такую же таблицу (набор таблиц) а потом напиши перебрасыватель, который будет по записи перекидывать (First Next и подобное) Сложного ничего нет, я так сам поступаю. когда задача разовая, минут несколько подожду пока все записи перегоню в нужный мне формат, а потом уже работаю. По части интерфейса, если есть код этой книжки на акцезе, то переделать запросы дело простое, а интерфейс срисуй оттуда же.

Farkhad
Давай свое мыло, вышлю кусок исходного текста для подключения через ADO.

ShIvADeSt
Ясно. А какие компоненты использовать для подключения к акцесовскому фалу-базе?

Привет, спецы!
Может кто подскажет, где взять компоненту Animated Form для Delphi6. Она валялась в инете для Delphi5, но для 6-го не подходит.
Что она делает: при старте и закрытии программы главная форма не просто появляется и исчезает, а делает это с использованием мультика-последовательности изменений периметра формы случайного вида.
Заранее благодарю
мыло: pvol2@yahoo.com

PVol
Используй AnimateWindow.
Вот на скорую руку набросал:

Цитата:

program Project3;

uses
Forms, Windows,
Unit3 in 'Unit3.pas' {Form3};

{$R *.res}

begin
Application.Initialize;
Application.CreateForm(TForm3, Form3);
AnimateWindow(Form3.Handle, 1000, AW_HOR_POSITIVE);
AnimateWindow(Form3.Handle, 1000, AW_HOR_NEGATIVE+AW_HIDE);
Application.Run;
end.

>Еще вопрос: БД из Access в Interbase конвертировать тяжело? Какие есть для этого
>компоненты/комбинации компонентов?
>Ситуация такая - есть, грубо говоря, записная книжка в Access, ее нужно сделать
>сетевой. Вот, думаю написать на Делфе клиента под Интервасю.

Есть IBPump.exe

Кроме того, к файлу Access можно и по сети обращаться... причем нескольким пользователям.

>Ясно. А какие компоненты использовать для подключения к акцесовскому фалу-базе?
Вкладка ADO

Супер ламерский вопрос:
У меня есть форма Form1, а на ней есть элемен TMemo с название memo1. В процессе обработки данных на экран в эту memo1 выводится результат.

Скажите пожалуйста, как сделать так, чтобы результаты выводились не друг за другом в строчку, а чтобы в конце как бы нажимался <Enter>???

Т.е. при нажатии на кнопку происходит следующее

Цитата:

for i:=1 to el_sk do
memo1.Text:=memo1.Text+lok[i].no+' ';

мне нужно, чтобы после каждой итерации в конце нажимался какбы Ентер, чтобы всё выводилось в виде столбика.
Просто в Pascal'e это было writeln, а здесь я не знаю как.

Огромное спасибо.

Добавлено:

И ещё.
Например имеется 25 TEdit елементов с названиями Edit1, Edit2... можно ли как-то при помощи цыкла их значения считывать например в масив , а то вручную запарно всё это делать. Так, чтобы

Цитата:

for i:=1 to el_sk do
mas[i]:=StrToInt(******); где ****** это Edit с номером i

Ещё раз спасибо.

YurikGL

Цитата:

Кроме того, к файлу Access можно и по сети обращаться... причем нескольким пользователям.

Я с акцессом не работал, поэтому не в курсе. Просто в данном случае, когда мы пытаемся запустить с другого компа уже открытый в другом месте файл, ничего не делается...