Необходимо сделать имитацию папки на DELPHI

@OlegDevDelphi · Регистрация: 19.05.2018

Author24 — интернет-сервис помощи студентам

Мне в проекте необходимо сделать имитацию папки на DELPHI. То есть чтобы можно было ее создавать (это я уже сделал, путем динамического создания image'ов), переименовывать (это я тоже практически сделал), НО главная ПРОБЛЕМА в том, что я не могу сделать так, чтобы эти папки открывались и чтобы в них можно было помещать другие папки. Мне говорили, что это можно сделать с помощью классов, но я не особо то силён в ООП, так как в принципе с Delphi совсем недавно начал общение. Я ВАС УМОЛЯЮ, ПОМОГИТЕ МНЕ(((

@qwertehok · 20.05.2018, 07:22

чем?
кода нет, картинок нет, вопроса нет

@OlegDevDelphi · 20.05.2018, 11:31 **[ТС]**

В том то и дело, что не важно чем. Главное чтобы универсально было, тоесть не тупо была возможность создать одну папку, а много. А ихображения тебе зачем? Что ты там увидишь? Я же объяснил, вот давай забцдем про папку. Представь на форме есть какая то картинка, и таких картинок можно создавать много, а когда мы дважды кликаем на любую из этих картинок, должна создаваться например новая форма, и бубет похоже, будто мы ее открыли, как папку. Но проьлема в том, что в ту форму надо сделать возможность перемещать и другие папки...

Добавлено через 4 минуты
Простите, вот код

Delphi

procedure TForm1.N1Click(Sender: TObject);
var
  Im: TImage;
begin
  Im:= TImage.Create(Form1);
  with Im do
  begin
    Parent := Form1;
    Picture.LoadFromFile('folder.png');// тут свой файл
    Stretch := True;
    Top := 400;
    Left := 10;
    Height:=55;
    Width:=54;
    OnMouseMove:=Image3MouseMove;
    OnMouseLeave:=Image3MouseLeave;    // Эти все динамические свойства для того, чтобы можно было перетягивать папку мышкой
    OnMouseUp:=Image3MouseUp;
    OnMouseDown:=Image3MouseDown;
  end; end;

Это динамическое создание иконки папки, а теперь надо бы как то сделать имитацию открытия...

@qwertehok · 20.05.2018, 11:51

Сообщение от OlegDevDelphi

а когда мы дважды кликаем на любую из этих картинок, должна создаваться например новая форма

в чем проблема это реализовать?
есть событие DblClick - переопределяй его.

ЗЫ конечно если лезть совсем далеко в твою задачу (например возврат назад из папки), то стоит вспомнить про ООП и начать думать про объекты
Папка
-Имя
-Картинка
-ДочерниеПапки()
-РодительскаяПапка
и тд и тп

@OlegDevDelphi · 20.05.2018, 12:25 **[ТС]**

Именно с ООП мне тут работать и нужно((( Не могли бы с этим помочь?

Комментарий модератора

Правила 5.9. Запрещено отсылать пользователей из тематических разделов в разделы фриланса, а также рекламировать свои услуги или предлагать/просить/требовать оплату за помощь, кроме разделов для платных услуг.

@qwertehok · 20.05.2018, 12:32

Комментарий модератора

Правила 5.9. Запрещено отсылать пользователей из тематических разделов в разделы фриланса, а также рекламировать свои услуги или предлагать/просить/требовать оплату за помощь, кроме разделов для платных услуг.

@OlegDevDelphi 2 / 2 / 0 Регистрация: 19.05.2018 Сообщений: 46
		1
	Необходимо сделать имитацию папки на DELPHI 19.05.2018, 20:00. Показов 611. Ответов 5 Метки нет (Все метки) Мне в проекте необходимо сделать имитацию папки на DELPHI. То есть чтобы можно было ее создавать (это я уже сделал, путем динамического создания image'ов), переименовывать (это я тоже практически сделал), НО главная ПРОБЛЕМА в том, что я не могу сделать так, чтобы эти папки открывались и чтобы в них можно было помещать другие папки. Мне говорили, что это можно сделать с помощью классов, но я не особо то силён в ООП, так как в принципе с Delphi совсем недавно начал общение. Я ВАС УМОЛЯЮ, ПОМОГИТЕ МНЕ((( 0

@qwertehok 5395 / 4323 / 1060 Регистрация: 29.08.2013 Сообщений: 27,129 Записей в блоге: 3
	20.05.2018, 07:22	2
	чем? кода нет, картинок нет, вопроса нет 1

@qwertehok 5395 / 4323 / 1060 Регистрация: 29.08.2013 Сообщений: 27,129 Записей в блоге: 3
	20.05.2018, 11:51	4
	Сообщение от OlegDevDelphi а когда мы дважды кликаем на любую из этих картинок, должна создаваться например новая форма в чем проблема это реализовать? есть событие DblClick - переопределяй его. ЗЫ конечно если лезть совсем далеко в твою задачу (например возврат назад из папки), то стоит вспомнить про ООП и начать думать про объекты Папка -Имя -Картинка -ДочерниеПапки() -РодительскаяПапка и тд и тп 0