|
При скрывании первой формы - Вопросы и ответы, обсуждения - Ваши вопросы по Pascal/Delphi только в данном разделе |
14.06.2011, 18:44
|
#1
|
|
|
|
Пехотинец
|
Регистрация: 29.05.2011
Сообщений: 79
Популярность: 3379
Сказал(а) спасибо: 314
Поблагодарили 351 раз(а) в 157 сообщениях
|
При скрывании первой формы
прячу первую форму, фторая открывается,но т.к. я спрятал первую форму, значок с панели задач,тоже прячется, а мне надо его оставить, и чтоб скажем так "главной" формой,стала вторая.
Более понятнее наверное так:
Когда форму1 делаем невидимой,скрывается знчок с панели задач
надо чтобы у формы2 тоже был значок на панели задач...
|
|
|
14.06.2011, 19:07
|
#2
|
|
|
|
Лейтенант-командор
|
Регистрация: 12.08.2010
Сообщений: 727
Популярность: 30569
Золото Zhyk.Ru: 1
Сказал(а) спасибо: 57
Поблагодарили 645 раз(а) в 386 сообщениях
|
Re: При скрывании первой формы
________________
Принимаются пожертвования любых размеров в фонд поддержки начинающих программистов
Кошельки: WMZ - Z276844220882; WMR - R231028582939; WMU - U394136909210; ЯД - 410011494605270.
Perfect World: PWDatabaseScanner, Client, PWNickRenamer, PWClientRenamer, База логинов PW, Гайд по варУ, Зарабатываем репутацию.
Delphi: Авторизация на сайте с помощью Indy, Загрузка изображений с интернета в TImage с помощью Indy, Автоматическая смена стандартной версии Indy в Delphi на Indy 10.0.76 / 10.1.5, Основы парсинга с помощью Indy, Делаем Updater до программы с помощью Indy.
Other: ShowIP, FFUUU смайлы в QIP, Как играть в Minecraft (видеокурс), Как мы захватили человечество :D, Энергия в Лицемер/TopFace, PasGen.
|
|
|
14.06.2011, 22:41
|
#3
|
|
|
|
Лейтенант-командор
|
Регистрация: 12.08.2010
Сообщений: 727
Популярность: 30569
Золото Zhyk.Ru: 1
Сказал(а) спасибо: 57
Поблагодарили 645 раз(а) в 386 сообщениях
|
Re: При скрывании первой формы
|
Цитата: |
|
|
|
|
Сообщение от Assistant.DO |
|
|
|
|
|
|
|
мне надо перейти по ссылке, делаю гет запрос, 0 внимания....что можешь посоветовать?
|
|
|
|
|
|
Перейти по ссылке где? В компоненте WebBrowser? Или ты пишешь типо бот для онлайн игры и тебе надо отправить гет запрос?
Если в веб браузере, то
Код:
WebBrowser1.Navigate(Edit1.Text);
Если get запрос, то
Ну как-то так..
________________
Принимаются пожертвования любых размеров в фонд поддержки начинающих программистов
Кошельки: WMZ - Z276844220882; WMR - R231028582939; WMU - U394136909210; ЯД - 410011494605270.
Perfect World: PWDatabaseScanner, Client, PWNickRenamer, PWClientRenamer, База логинов PW, Гайд по варУ, Зарабатываем репутацию.
Delphi: Авторизация на сайте с помощью Indy, Загрузка изображений с интернета в TImage с помощью Indy, Автоматическая смена стандартной версии Indy в Delphi на Indy 10.0.76 / 10.1.5, Основы парсинга с помощью Indy, Делаем Updater до программы с помощью Indy.
Other: ShowIP, FFUUU смайлы в QIP, Как играть в Minecraft (видеокурс), Как мы захватили человечество :D, Энергия в Лицемер/TopFace, PasGen.
Последний раз редактировалось VeTaL_UA; 14.06.2011 в 22:44.
|
|
|
15.06.2011, 06:52
|
#4
|
|
|
|
Разведчик
|
Регистрация: 31.05.2011
Сообщений: 6
Популярность: 194
Сказал(а) спасибо: 9
Поблагодарили 25 раз(а) в 12 сообщениях
|
Re: При скрывании первой формы
|
Цитата: |
|
|
|
|
|
|
|
|
|
прячу первую форму, фторая открывается,но т.к. я спрятал первую форму, значок с панели задач,тоже прячется, а мне надо его оставить, и чтоб скажем так "главной" формой,стала вторая.
Более понятнее наверное так:
Когда форму1 делаем невидимой,скрывается знчок с панели задач
надо чтобы у формы2 тоже был значок на панели задач...
|
|
|
|
|
|
На событии OnShow первой формы пропиши строчку Application.MainForm := Form2; , а на этом же событии второй формы напиши Application.MainForm := Form1;
Добавлено через 13 минут
|
Цитата: |
|
|
|
|
|
|
|
|
|
прячу первую форму, фторая открывается,но т.к. я спрятал первую форму, значок с панели задач,тоже прячется, а мне надо его оставить, и чтоб скажем так "главной" формой,стала вторая.
Более понятнее наверное так:
Когда форму1 делаем невидимой,скрывается знчок с панели задач
надо чтобы у формы2 тоже был значок на панели задач...
|
|
|
|
|
|
На событии OnShow первой формы пропиши строчку Application.MainForm := Form2; , а на этом же событии второй формы напиши Application.MainForm := Form1;
Последний раз редактировалось R-A-Z-O-R; 15.06.2011 в 07:06.
Причина: Добавлено сообщение
|
|
|
15.06.2011, 12:24
|
#5
|
|
|
|
Пехотинец
|
Регистрация: 29.05.2011
Сообщений: 79
Популярность: 3379
Сказал(а) спасибо: 314
Поблагодарили 351 раз(а) в 157 сообщениях
|
Re: При скрывании первой формы
|
Цитата: |
|
|
|
|
|
|
|
|
|
На событии OnShow первой формы пропиши строчку Application.MainForm := Form2; , а на этом же событии второй формы напиши Application.MainForm := Form1;
Добавлено через 13 минут
На событии OnShow первой формы пропиши строчку Application.MainForm := Form2; , а на этом же событии второй формы напиши Application.MainForm := Form1;
|
|
|
|
|
|
[DCC Error] Unit2.pas(37): E2129 Cannot assign to a read-only property
[DCC Error] Project1.dpr(6): F2063 Could not compile used unit 'Unit2.pas'
это вот с твоими строками, без них все ок, ток иконки на панеле нету
|
|
|
15.06.2011, 13:21
|
#6
|
|
|
|
Разведчик
|
Регистрация: 31.05.2011
Сообщений: 6
Популярность: 194
Сказал(а) спасибо: 9
Поблагодарили 25 раз(а) в 12 сообщениях
|
Re: При скрывании первой формы
|
|
|
15.06.2011, 13:56
|
#7
|
|
|
|
Пехотинец
|
Регистрация: 29.05.2011
Сообщений: 79
Популярность: 3379
Сказал(а) спасибо: 314
Поблагодарили 351 раз(а) в 157 сообщениях
|
Re: При скрывании первой формы
|
|
|
15.06.2011, 14:22
|
#8
|
|
|
|
Лейтенант-командор
|
Регистрация: 12.08.2010
Сообщений: 727
Популярность: 30569
Золото Zhyk.Ru: 1
Сказал(а) спасибо: 57
Поблагодарили 645 раз(а) в 386 сообщениях
|
Re: При скрывании первой формы
Лучше изначально делать form2 главной, а form1 вызывать в OnCreate главной формы методом ShowModal, а потом удалять.
________________
Принимаются пожертвования любых размеров в фонд поддержки начинающих программистов
Кошельки: WMZ - Z276844220882; WMR - R231028582939; WMU - U394136909210; ЯД - 410011494605270.
Perfect World: PWDatabaseScanner, Client, PWNickRenamer, PWClientRenamer, База логинов PW, Гайд по варУ, Зарабатываем репутацию.
Delphi: Авторизация на сайте с помощью Indy, Загрузка изображений с интернета в TImage с помощью Indy, Автоматическая смена стандартной версии Indy в Delphi на Indy 10.0.76 / 10.1.5, Основы парсинга с помощью Indy, Делаем Updater до программы с помощью Indy.
Other: ShowIP, FFUUU смайлы в QIP, Как играть в Minecraft (видеокурс), Как мы захватили человечество :D, Энергия в Лицемер/TopFace, PasGen.
|
|
|
15.06.2011, 14:26
|
#9
|
|
|
|
Пехотинец
|
Регистрация: 29.05.2011
Сообщений: 79
Популярность: 3379
Сказал(а) спасибо: 314
Поблагодарили 351 раз(а) в 157 сообщениях
|
Re: При скрывании первой формы
|
|
|
15.06.2011, 16:13
|
#10
|
|
|
|
Лейтенант-командор
|
Регистрация: 12.08.2010
Сообщений: 727
Популярность: 30569
Золото Zhyk.Ru: 1
Сказал(а) спасибо: 57
Поблагодарили 645 раз(а) в 386 сообщениях
|
Re: При скрывании первой формы
________________
Принимаются пожертвования любых размеров в фонд поддержки начинающих программистов
Кошельки: WMZ - Z276844220882; WMR - R231028582939; WMU - U394136909210; ЯД - 410011494605270.
Perfect World: PWDatabaseScanner, Client, PWNickRenamer, PWClientRenamer, База логинов PW, Гайд по варУ, Зарабатываем репутацию.
Delphi: Авторизация на сайте с помощью Indy, Загрузка изображений с интернета в TImage с помощью Indy, Автоматическая смена стандартной версии Indy в Delphi на Indy 10.0.76 / 10.1.5, Основы парсинга с помощью Indy, Делаем Updater до программы с помощью Indy.
Other: ShowIP, FFUUU смайлы в QIP, Как играть в Minecraft (видеокурс), Как мы захватили человечество :D, Энергия в Лицемер/TopFace, PasGen.
|
|
|
15.06.2011, 17:04
|
#11
|
|
|
|
Пехотинец
|
Регистрация: 29.05.2011
Сообщений: 79
Популярность: 3379
Сказал(а) спасибо: 314
Поблагодарили 351 раз(а) в 157 сообщениях
|
Re: При скрывании первой формы
|
|
|
15.06.2011, 17:31
|
#12
|
|
|
|
Разведчик
|
Регистрация: 31.05.2011
Сообщений: 6
Популярность: 194
Сказал(а) спасибо: 9
Поблагодарили 25 раз(а) в 12 сообщениях
|
Re: При скрывании первой формы
|
Цитата: |
|
|
|
|
|
|
|
|
|
как?я твоей мысли не уловил.
У меня проходят авторизацию. псоле чего открывается вторая форма(значок убирается)
|
|
|
|
|
|
Так бы и сказал
Авторизовался, вводи
Код:
Form1.Visible := false;
Form2.Show
И скажи версию делфи
|
|
|
15.06.2011, 17:49
|
#13
|
|
|
|
Пехотинец
|
Регистрация: 29.05.2011
Сообщений: 79
Популярность: 3379
Сказал(а) спасибо: 314
Поблагодарили 351 раз(а) в 157 сообщениях
|
Re: При скрывании первой формы
|
Цитата: |
|
|
|
|
|
|
2010дельфи
пробывал, не помогает...
|
|
|
15.06.2011, 18:37
|
#14
|
|
|
|
Маршал
|
Регистрация: 05.05.2009
Сообщений: 875
Популярность: 48955
Золото Zhyk.Ru: 850
Сказал(а) спасибо: 155
Поблагодарили 739 раз(а) в 274 сообщениях
|
Re: При скрывании первой формы
Form1:
Код:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses Unit2;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.Hide();
Form2.Show();
end;
end.
Form2:
Код:
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm2 = class(TForm)
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
procedure CreateParams(var Params: TCreateParams); override;
public
{ Public declarations }
end;
var
Form2: TForm2;
implementation
{$R *.dfm}
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
with Params do
ExStyle := ExStyle or WS_EX_APPWINDOW;
end;
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Application.Terminate;
end;
end.
|
|
|
Пользователь сказал cпасибо:
|
|
15.06.2011, 18:55
|
#15
|
|
|
|
Пехотинец
|
Регистрация: 29.05.2011
Сообщений: 79
Популярность: 3379
Сказал(а) спасибо: 314
Поблагодарили 351 раз(а) в 157 сообщениях
|
Re: При скрывании первой формы
Код:
procedure TForm6.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
with Params do
ExStyle := ExStyle or WS_EX_APPWINDOW;
end;
[DCC Error] Unit6.pas(82): E2003 Undeclared identifier: 'CreateParams'
[DCC Error] Unit6.pas(82): E2029 ';' expected but '(' found
[DCC Error] Unit6.pas(82): E2029 ';' expected but ')' found
[DCC Error] Unit6.pas(84): E2075 This form of method call only allowed in methods of derived types
[DCC Fatal Error] hi.dpr(6): F2063 Could not compile used unit '..\Unit6.pas'
вот, выдает при компиляции....
чтож я такой криворукий-то...
|
|
|
Ваши права в разделе
|
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
HTML код Выкл.
|
|
|
Похожие темы
|
Тема |
Автор |
Раздел |
Ответов |
Последнее сообщение |
формы
|
maniakk |
Школа Читера |
1 |
11.05.2011 04:58 |
[Помогите!] Закрытие формы
|
CheaterNoob |
Вопросы и ответы, обсуждения |
2 |
22.04.2011 03:18 |
[Помогите!] Где достать эти формы?
|
Gave |
Общение и обсуждение Perfect World |
7 |
21.03.2011 17:59 |
[Продам] гал на первой европе
|
sandrik021 |
Dark Orbit |
1 |
10.09.2010 16:50 |
[Помогите!] Почтовые формы
|
jkpro |
Общение и обсуждение Perfect World |
3 |
10.01.2010 21:11 |
Заявление об ответственности / Список мошенников
Часовой пояс GMT +4, время: 08:59.
|
|