Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как сделать диалог "Настройка" 
:(
    Опции темы
Alex103
  Дата 20.3.2005, 06:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 416
Регистрация: 5.1.2005
Где: Украина, г. Харьк ов

Репутация: нет
Всего: нет
Как мне сделать следующее мне нужно что-бы при нажатии на кнопке настройка появлялась форма в этой форме в Чек боксах или в разном другом выбрать определенные настройки а все это присенилось лиш тогда когда будет нажата клавиша применить. Обьясните все по порядку


--------------------
Мой адресс не дом и не улица, мой адресс WWW
PM MAIL WWW ICQ YIM   Вверх
Vit
Дата 20.3.2005, 07:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Vitaly Nevzorov
****


Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207
Появлялась форма - создаёшьл новую форму в проекте, показать -

Form2.Showmodal;

Запоминать - ну сам должен придумать чего, как и где ты будешь запоминать


--------------------
With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru
PM MAIL WWW ICQ   Вверх
Alex103
Дата 20.3.2005, 07:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 416
Регистрация: 5.1.2005
Где: Украина, г. Харьк ов

Репутация: нет
Всего: нет
Цитата(Vit @ 20.3.2005, 07:33)
Появлялась форма - создаёшьл новую форму в проекте, показать -

Form2.Showmodal;

Запоминать - ну сам должен придумать чего, как и где ты будешь запоминать

А конкретнее!!!


--------------------
Мой адресс не дом и не улица, мой адресс WWW
PM MAIL WWW ICQ YIM   Вверх
Vit
Дата 20.3.2005, 07:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Vitaly Nevzorov
****


Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207
Не, писать за тебя не буду... Это ты конкретнее задавай вопрос, что именно тебе не понятно


--------------------
With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru
PM MAIL WWW ICQ   Вверх
Alex103
Дата 20.3.2005, 07:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 416
Регистрация: 5.1.2005
Где: Украина, г. Харьк ов

Репутация: нет
Всего: нет
Цитата(Vit @ 20.3.2005, 07:38)
Не, писать за тебя не буду... Это ты конкретнее задавай вопрос, что именно тебе не понятно

Спокойно!! Щас я все растолкую!!! Мне не понятно следующее как сделать так что-бы при загрузке какой-то 2 формы которая грузиться при нажатии на кнопке на 1 форме. Сделать так что-бы при изменении каких-то параметров 1 формы (но что-бы эти изменения прошли на 2 форме) это все применилось при нажатии на кнопку. Вроде все понятно!!!!!


--------------------
Мой адресс не дом и не улица, мой адресс WWW
PM MAIL WWW ICQ YIM   Вверх
Vit
Дата 20.3.2005, 09:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Vitaly Nevzorov
****


Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207
Во второй форме можно обратиться к первой по имени:

Код

Form1.memo1.enabled:=checkbox1.checked;



--------------------
With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru
PM MAIL WWW ICQ   Вверх
~FoX~
Дата 21.3.2005, 13:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


НЕ рыжий!!!
****


Профиль
Группа: Участник Клуба
Сообщений: 2819
Регистрация: 8.10.2003
Где: Зеленоград

Репутация: 13
Всего: 68
Ни че не понял
Код

procedure AplyPress(sender: TObject);
begin
  Form1.Left := Form2.SpinEdit1.Value;
end;

Так что ли?
Если изменения должны сохраниться, то исползуй ини файлы или реестр.


--------------------
user posted image
…множественность никогда не следует полагать без необходимости…
PM MAIL WWW ICQ Jabber   Вверх
Alex103
Дата 22.3.2005, 02:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 416
Регистрация: 5.1.2005
Где: Украина, г. Харьк ов

Репутация: нет
Всего: нет
Цитата(Vit @ 20.3.2005, 09:24)
Во второй форме можно обратиться к первой по имени:

Код

Form1.memo1.enabled:=checkbox1.checked;

Я просто не могу подклячить 2 форму к первой так как уже подключил 1 к 3 и как только я юзах для 3 формы прописываю 1 то мне выдаеться ошибка.


--------------------
Мой адресс не дом и не улица, мой адресс WWW
PM MAIL WWW ICQ YIM   Вверх
Poseidon
Дата 22.3.2005, 04:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 53
Всего: 133
Цитата(Alex103 @ 22.3.2005, 02:28)
Я просто не могу подклячить 2 форму к первой так как уже подключил 1 к 3 и как только я юзах для 3 формы прописываю 1 то мне выдаеться ошибка.

Значит так. Я обычно делаю следующим образом:
В unit главной формы в разделе interface в Uses (там где все юниты прописаны) прописываю все unit проекта. А уже в дополнительных модулях прописываю юнит главной формы в разделе implementation, т.е там где по сути код. В противном случае генерируется фатальная ошибка "Circular unit reference to '<element>'". Видимо именно с ней ты и столкнулся.

Если ничего не понятно, то вот пример:

Unit главной формы:
Код
unit MainUnit;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Unit2, Unit3, Unit4;   // здесь все и прописываеся.

type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

// здесь процедуры и функции

end.



Unit НЕглавной формы:
Код
unit Unit2;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm2 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form2: TForm2;

implementation

{$R *.dfm}

Uses MainUnit // здесь прописан Unit главной формы.

// здесь процедуры и функции

end.


Это сообщение отредактировал(а) Poseidon - 22.3.2005, 04:07


--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
mvdr
Дата 22.3.2005, 06:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


физик
***


Профиль
Группа: Участник
Сообщений: 1349
Регистрация: 31.12.2004
Где: Волгоград, Россия

Репутация: 1
Всего: 42
вопрос: а зачем вторая форма? Если надо вывести меню "настройка", то его удобнее выводить в CheckBox, чтобы был выбор пунктов. Только не легче ли сделать этот checkBox на отдельной Panel и при выборе где нибудь "настройка" все остальное делать не видимым, а эту
Код

Panel1.Visible:=true;
? Проще и удобнее.
Я так понял вторая форма нужна лишь для настройки, так зачем "губить" ради этого форму?


--------------------
Появляюсь редко, но часто метко

Изображать идиота сложнее, чем изображать умного: полезнее и не каждому дано
PM ICQ   Вверх
Poseidon
Дата 23.3.2005, 01:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 53
Всего: 133
Femida, ну хочет человек отдельную форму и все тут.


--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
Alex103
Дата 23.3.2005, 02:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 416
Регистрация: 5.1.2005
Где: Украина, г. Харьк ов

Репутация: нет
Всего: нет
Цитата(Femida @ 22.3.2005, 06:19)
вопрос: а зачем вторая форма? Если надо вывести меню "настройка", то его удобнее выводить в CheckBox, чтобы был выбор пунктов. Только не легче ли сделать этот checkBox на отдельной Panel и при выборе где нибудь "настройка" все остальное делать не видимым, а эту
Код

Panel1.Visible:=true;
? Проще и удобнее.
Я так понял вторая форма нужна лишь для настройки, так зачем "губить" ради этого форму?

Пойми меня правильно я не только хочу понять как сделать диалог настройка но и еще научиться программировать. Панелькой я бы и сам сделал но вот таким способом который предложил Посейдон немного сложнее вот я и хочу понять все тонкости.
Добавлено @ 02:03
Цитата(Poseidon @ 22.3.2005, 04:05)
Цитата(Alex103 @ 22.3.2005, 02:28)
Я просто не могу подклячить 2 форму к первой так как уже подключил 1 к 3 и как только я юзах для 3 формы прописываю 1 то мне выдаеться ошибка.

Значит так. Я обычно делаю следующим образом:
В unit главной формы в разделе interface в Uses (там где все юниты прописаны) прописываю все unit проекта. А уже в дополнительных модулях прописываю юнит главной формы в разделе implementation, т.е там где по сути код. В противном случае генерируется фатальная ошибка "Circular unit reference to '<element>'". Видимо именно с ней ты и столкнулся.

Если ничего не понятно, то вот пример:

Unit главной формы:
Код
unit MainUnit;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Unit2, Unit3, Unit4;   // здесь все и прописываеся.

type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

// здесь процедуры и функции

end.



Unit НЕглавной формы:
Код
unit Unit2;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm2 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form2: TForm2;

implementation

{$R *.dfm}

Uses MainUnit // здесь прописан Unit главной формы.

// здесь процедуры и функции

end.

Именно эта ошибка у меня и вылетала. Спасибо тебе огромное. Вот тебе + к репутации!!!!


--------------------
Мой адресс не дом и не улица, мой адресс WWW
PM MAIL WWW ICQ YIM   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0557 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.