Открытие нескольких позиций

@duh_si · Регистрация: 18.10.2012

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

День добрый.
Захотели тут мои пользователи открывать несколько позиций ( заказов )
Т.е есть ленточная форма, открыл пользователь один заказ для просмотра и захотел открыть еще один не закрывая первого, чтобы так сказать что то в них сравнить или скопировать.

посоветуйте как реализовать такую хотелку...

@Agapov_stas · 01.03.2014, 15:23

Visual Basic
1
If Not Me.NewRecord Then DoCmd.OpenForm ("ДобПродукты"), , , "Код=" & Nz(Me.Код,0)

P.S. В Вашем примере не смогу сделать, акс сразу вылетает, видимо из за новшеств 2007(или какого там) акса..

mobile · 01.03.2014, 16:03

duh_si, смотрите Открыть еще одно окно с той же формы

@duh_si · 03.03.2014, 09:39 **[ТС]**

День добрый.
mobile Взял я ваш пример, вот сейчас сижу разбираюсь , потихоньку переношу в свою программу
Возник вопрос

Visual Basic
1
2
3
4
5
6
Sub colEx(id)
'    Set frm = New Form_Заказ один
    KeepNewFormClone(New Form_Заказ один).Visible = True
    frm.Form.RecordSource = "select * from Заказ where [Номер]=" & Me.Код
    frm.Form.Tag = id
End Sub

1.Можно ли вот так писать (New Form_[Заказ один]) потому что форма у меня написана раздельно и исправлять если её, то это очень во многих местах придется делать.

2.Если я в отладчике компилирую, У меня ругается в 3 строке KeepNewFormClone
Compile error: Argument not optional
Если же не компилировать, а сразу форму запустить, то ошибки нет и вроде как Клонирует форму

mobile · 03.03.2014, 09:54

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

Sub colEx(id)

duh_si, эта процедура устаревшая. И осталась по моему недосмотру. Она не нужна. Вообще! Закомментируйте ее. Или удалите.

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

Можно ли вот так писать (New Form_[Заказ один]) потому что форма у меня написана раздельно и исправлять если её, то это очень во многих местах придется делать.

Пробуйте. Но, мне кажется с прямыми скобками нельзя. Вместо пробела в "Заказ один" напишите символ "_" - Заказ_один

@duh_si · 03.03.2014, 10:06 **[ТС]**

Пробуйте. Но, мне кажется с прямыми скобками нельзя. Вместо пробела в "Заказ один" напишите символ "_" - Заказ_один

в том то и дело я уже все это перепробовал ( [], "", _ )

Visual Basic
1
2
3
4
5
6
7
Private Sub Êîä_DblClick(Cancel As Integer)
    Dim c
    KeepNewFormClone(New Form_Çàêàç_îäèí, Me.Êîä).Visible = True
    c = Forms.Count - 1
    Forms(c).Move Forms(c).WindowLeft + c * 100, Forms(c).WindowTop + c * 100, Forms(c).WindowWidth, Forms(c).WindowHeight
'Call ubratstl
End Sub

Сейчас на 3 строку в этом коде ругается

mobile · 03.03.2014, 13:07

duh_si, был занят. Не мог ответить.

При обращении к KeepNewFormClone, в случае имени формы с пробелом, в прямых скобках должно быть полное имя экземпляра формы
KeepNewFormClone(New [Form_Заказ один]).Visible = True

@duh_si · 03.03.2014, 13:16 **[ТС]**

Сделал как вы предлагаете , теперь ошибку на KeepNewFormClone в этой же строке
Compile error: Argument not optional

до этого я пробовал вот так KeepNewFormClone(New [Form_Заказ один], Me.Код).Visible = True
ошибки не было, но тогда создаются 2 экземпляра формы
Причем интересно, я открываю первый заказ , он создает 2 одинаковые формы, потом не закрывая первого, открываю второй, у первого остается 1 экземпляр, а у второго 2 и т.д

mobile · 03.03.2014, 13:58

duh_si, вот вариант с именем формы с пробелом

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

Compile error: Argument not optional

А, ну да, я про 2-й параметр забыл в сообщении от 14:07

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .

mobile 26825 / 14505 / 3192 Регистрация: 28.04.2012 Сообщений: 15,782
	01.03.2014, 16:03
	duh_si, смотрите Открыть еще одно окно с той же формы 1

mobile 26825 / 14505 / 3192 Регистрация: 28.04.2012 Сообщений: 15,782
	03.03.2014, 13:07
	duh_si, был занят. Не мог ответить. При обращении к KeepNewFormClone, в случае имени формы с пробелом, в прямых скобках должно быть полное имя экземпляра формы KeepNewFormClone(New [Form_Заказ один]).Visible = True 0

@duh_si 569 / 169 / 22 Регистрация: 18.10.2012 Сообщений: 912
	03.03.2014, 13:16 [ТС]
	Сделал как вы предлагаете , теперь ошибку на KeepNewFormClone в этой же строке Compile error: Argument not optional до этого я пробовал вот так KeepNewFormClone(New [Form_Заказ один], Me.Код).Visible = True ошибки не было, но тогда создаются 2 экземпляра формы Причем интересно, я открываю первый заказ , он создает 2 одинаковые формы, потом не закрывая первого, открываю второй, у первого остается 1 экземпляр, а у второго 2 и т.д 0

Открытие нескольких позиций

Решение