[ Delphi / Pascal ] — начинающим: задаем вопросы (архивная - 2015)

не понял... ты что про mdi - интерфейс???
а для того чтобы раздвинуть форму у нее необходимо поставить свойство BorderStyle = bsSingle

 

Спасибо но не то иммено а вот ты написал и я тамже нижняя она там самая вот ето я искал =)!!!

Code:

bsToolWindow

 

А мона как нить на Delphi заменить кнопки чтоб были не как у 95-98 винды =( а на современые =) а то ктонить глянет на приложение и оболдеет =(??? Подскажите =) а то я тока,тока с ним начал общатся =(

 

SNAIPER ShoT
Ставь на форуму компонент XPManifest из вкладки Win32

И еще, кинь в папку ../Delphi7/Bin этот файл: http://dump.ru/files/h/h074000083/ тогда и сам дельфи преобразится под винду)

 

СПС =) Работаит =)! А мона вот ставиш в приложении AbouT в маин меню (Menus) на него ктонить код может написать а то не получаетси =( ppc!!!

 

SNAIPER ShoT
Почитай это:


http://rapidshare.de/files/13156194/Bibliya_Delphi.part1.rar.html
http://rapidshare.de/files/13156818/Bibliya_Delphi.part2.rar.html
http://rapidshare.de/files/13157655/Bibliya_Delphi.part3.rar.html

 

Есть готовые формы...
Смотри в File->New
поищи... там есть отдельно AboutForm кажется =/

 

угу, New > Other > Forms > AboutBox. В своем коде в uses пишеш - unit2, а потом в нужном месте Unit2.AboutBox.Show; чтобы появился About.

 

В любом ето каком??? например мона тута прям да:
procedure TForm1.Info1Click(Sender: TObject);
begin

Code:

Unit2.AboutBox.Show; 

end;

или так ошибка будет ???

 

да, можно и так попробуй возьми .. быстрее поймеш что и куда

 

Люди а подскажите как можно к проге теперь форму password подвизать чтоб она без пароля не запускалася?

 

SNAIPER ShoT
Ты каждый свой бредовый вопрос собираешься задавать тут?))
Прочти сначала книгу из 392 поста, а потом спрашивай

 

ппц я просто в шоке...
1. Юзать MaskEdit
2. Тоже есть готовая форма... =/

 

Сначала добавь к проекту PasswordDlg из File->New->Other->Dialogs;

Потом сделай PasswordDlg главной формой в проекте и перенеси Form1 в список доступных форм. В PasswordDlg вставь

Code:

 
procedure TPasswordDlg.OKBtnClick(Sender: TObject);
begin
if Password.Text='Pass' then
begin
Application.CreateForm(Tform1,Form1);
Form1.Show;
PasswordDlg.Hide;
end else ShowMessage('Incorrect password.');
end;

Теперь Form1 будет запускаться ток апри введении пароля Pass.

 

К чему делать пассворд диалог главной формой?

Просто в дополнению к своей программе создаешь готовую форму PasswordDlg , Появится форма с двумя кнопками "Ок" "Выход" Label и Edit. Edit будет являтся полем ввода пароля поэтому свойство PasswordChar указываешь "*", если стандартно этого не будет.

Идешь в обработчик события главной формы, и в событии OnShow указываешь:

В этом случае главная форма останется главной, но перед ее запуском всегда будет появлятся PasswordDlg.

Для самой примитивной защиты пароль лучше хранить ввиде const. В обработчике события формы запроса пароля ищешь свойство OnCloseQuery и там вводим примерно такой код:

 

Он пишит что типо не понимает Const =(

 

вобщем вы наверное знаете программу Apex DC++ с открытым исходным кодом,когда там создается новая чат комнтата то почему-то коглда нажимаю+list он не выдает тех кто сидит в этой комнате а должен,как сделать так чтоб выдавал.?

 

Как это не понимает? Ты уверен что сделал все правильно? Ты ниразу не объявлял переменных или констант?

 

перед const, убери begin .

 

Точнее поменя их местами)

Если ты хочешь объявить константу после начала процедуры, тогда о чем может быть речь?!)