Имя: Пароль:
1C
1C 7.7
v7: Печать чека
, ,
0 Паштет
 
15.07.13
20:00
Здравствуйте, подскажите пожалуйста, не получается такая фишка. Конфа - тис, документ чекККМ, процедура при нажатии на кнопку "Печать" начинается так:

Процедура ПоКнопкеПечать(СразуНаПринтер = 0,КолЭкз = 1)

**********************

Я Сделал так:

Процедура ПоКнопкеПечать(СразуНаПринтер = 1,КолЭкз = 1)

дальше нажимаю на кнопку "печать" и хочу чтобы чек автоматически сразу распечатался на принтер. Но не тут то было...
1 Паштет
 
15.07.13
20:01
Не могли бы мне пожалуйста помочь, естественно не бесплатно.
2 Паштет
 
15.07.13
20:02
хотелось бы чтобы при нажатии на кнопку печать распечатывался сразу чек на принтер по умолчанию, такое возможно?
3 Ork
 
15.07.13
20:03
(2) Йес.
4 Паштет
 
15.07.13
20:03
(3) а можно поговорить с вами более предметно на эту тему?
5 Ork
 
15.07.13
20:04
+ (3) Ищите вызовы процедуры ПоКнопкеПечать, а не само определение.
6 Ork
 
15.07.13
20:05
+ (5) И вних первый параметр устанавливайте в единицу.
А вообще там должна быть настройка, которую можно посмотреть в этих вызовах.
7 Паштет
 
15.07.13
20:07
(6) я как бы это не сильно спец))) эээ... но попробую подуммать над тем, что вы написали в (5)
8 Паштет
 
15.07.13
20:08
(5) вызов процедуры это значит в глобальном нужно смотреть?
9 Паштет
 
15.07.13
20:09
аа, вот вроде нашел

   Если Парам.Получить("Команда") = "ПечатьНаПринтер" Тогда
           КолЭкз = Макс(Число(Парам.Получить("КолЭкз")),1);
           ПоКнопкеПечать(1,КолЭкз);
           СтатусВозврата(0);Возврат;
       ИначеЕсли Парам.Получить("Команда") = "ПечатьНаЭкран" Тогда
           ПоКнопкеПечать(0);                
           СтатусВозврата(0);Возврат;
       Иначе
           Сообщить("В форму документа "+Вид()+" передана неверная команда "+Парам.Получить("Команда")+"!","I");
           СтатусВозврата(0);Возврат;
       КонецЕсли;
10 Паштет
 
15.07.13
20:10
Но про "СразуНаПринтер" ничего не сказано, и даже похожего нету ничего
11 Voronve
 
15.07.13
20:16
Процедура Печать()

<... какая-то фигня ...>

Если СразуНаПринтер = 0 Тогда

<... и здесь какая-то фигня ...>

Иначе
   // Типовой код ...
   ПечТаблица.ПараметрыСтраницы(,,,,,,,,,1,,);
   ПечТаблица.КоличествоЭкземпляров(КолЭкз);
   ПечТаблица.Напечатать(0);
КонецЕсли;
КонецПроцедуры

Типовой код .ПараметрыСтраницы замени на

ПечТаблица.ПараметрыСтраницы(,,,,,,,,,1,,"\"); // Фича клюшек ...
12 Паштет
 
15.07.13
23:09
(11) О госое паде, палучилась))) Voronve, вот мое мыло [email protected] скинь сюда мну свой кошелек webmoney, я очень очень благодарен!
13 Паштет
 
15.07.13
23:10
Я просто не могу представить себе сколько нужно лет чтобы реально все это знать и так с легкостью отвечать на любые вопросы по клюшке))) вот бы я дорос до такого...
14 Voronve
 
16.07.13
07:51
(12) Был бы ты Газпромом ... Да и нет у меня webmoney.
15 Паштет
 
16.07.13
08:47
(14) скинь что есть! знания всегда дорого стоят)) + мне же еще не раз придется обращаться за помощью на мисту
16 Ёпрст
 
16.07.13
09:18
(12) рано радуешься
17 Ёпрст
 
16.07.13
09:18
печать всегда на дефолтный принтёр в системе - моветон.
18 Ёпрст
 
16.07.13
09:19
спасибо тебе за это, точно не скажут.
19 Паштет
 
16.07.13
10:43
(17) печатает нормально на принтер по умолчанию
20 Ёпрст
 
16.07.13
11:20
(19) ^))))
21 Ёпрст
 
16.07.13
11:20
cv (17)
22 Ёпрст
 
16.07.13
11:20
см (17).. и дальше (18).
23 Паштет
 
16.07.13
12:16
(22) а можете пожалуйста чуть-чуть детальнее описать, дефолтный это значит принтер по умолчанию, если я правильно понял))) так какие проблемы? принтер чеков выставляем по умолчанию, и пусть пашет
24 Ёпрст
 
16.07.13
12:36
(23) да. Печать ВСЕГДА на принтёр по-умолчанию, это моветон.
Должно печататься на "последний" принтер.
Для этого всего лишь нужно было добавить 1 строчку уода.
25 Ёпрст
 
16.07.13
12:36
кода
26 Паштет
 
16.07.13
13:01
(25) а можешь сказать какого кода пожалуйста:)
27 Паштет
 
16.07.13
13:03
погодь, а если я к примеру распечатал что-то с другого принтера, мне чек тогда распечатает с этого (последнего), который допустим не по умолчанию. Так ведь получается?
28 Паштет
 
16.07.13
13:04
или будет последний принтер с какого только чек распечатывался?
29 Паштет
 
16.07.13
13:05
если (28) тогда классно
30 Ёпрст
 
16.07.13
13:09
(27) для каждого юзверя для каждой формы запоминается последний принтёр.
Ты своим "\" принудительно отправляешь печатать на дефолтный.
Что не есть гуд.
31 Ёпрст
 
16.07.13
13:09
+30 и это штатное поведение платформы.
32 Паштет
 
16.07.13
13:15
(30) так помоги мну, я человек благодарный:)
33 Ёпрст
 
16.07.13
13:17
(32) задай уникальные опции печати и выкини "\" из параметров страницы.
34 Паштет
 
16.07.13
13:18
(33) "\" уже выкинул, а вот на счет первой части предложения тут возник ступор
35 Ёпрст
 
16.07.13
13:20
(34)

Таб.Опции(0,0,0,0,"МоиУникальныеОпцииДляПечатиЧека","ОкноПечатиЧека");
36 Паштет
 
16.07.13
13:21
(35) ану, попробую...
37 Паштет
 
16.07.13
14:09
(35) спасибо огромное, как я могу отблагодарить, только без скромности
38 Ёпрст
 
16.07.13
14:12
всё есть в личных настройках
39 Ёпрст
 
16.07.13
14:12
в личной карточке, точнее
40 Паштет
 
16.07.13
14:44
(39), все, щас отправлю... спасибо вам
41 Паштет
 
16.07.13
15:36
(39) отправил!
42 1Сергей
 
16.07.13
15:43
какая-то нездоровая тяга к благодарности
43 Ёпрст
 
16.07.13
15:43
(41) спсб
44 Паштет
 
16.07.13
15:46
(42) если знаю что еще буду обращаться сюда, ... А вообще ненавижу любителей шары...
45 Паштет
 
16.07.13
15:55
может еще подскажете как при нажатии например, на клавиатуре, нужной мне кнопки, на печатной форме чека нажималась кнопка "Печать", ну типа акселератор это вроде называется
46 Ёпрст
 
16.07.13
16:01
(45) & ставить в заголовке кнопки - будет по Альт+символ
47 Ёпрст
 
16.07.13
16:02
или команду прописать.. любую на кнопку (а не ту, что там дается)
Короче, можно любой хоткей повесить на кнопку.
48 Паштет
 
16.07.13
16:06
(47), так как именно, чтобы без альт, а просто, например, по ентеру сразу нажамался чек, или по ctrl
49 Паштет
 
16.07.13
16:08
Alt+символ немного неудобно будет
50 Паштет
 
16.07.13
16:42
может хоть книженцию подскажете где можно найти такую фишку или статью...
51 Паштет
 
16.07.13
16:42
это очень актуально
52 Паштет
 
16.07.13
16:44
или поисковый запрос
53 Chum
 
16.07.13
16:46
Виндовое Ctrl+P не устраивает?
54 Builder
 
16.07.13
16:48
Смотри свойства кнопки, там есть закладка "Команда"
Думаю тебе поможет.
А кнопку можно и спрятать, если она не нужна.
55 Ёпрст
 
16.07.13
16:49
http://rusfolder.com/37256171

на вот, дарю.
копиряй к себе нужную кнопку и правь формулу.. наслаждайся
56 Ёпрст
 
16.07.13
16:50
единственная засада - работают только 40 кнопок на форме.
57 Ёпрст
 
16.07.13
16:50
одновременно.
58 Паштет
 
16.07.13
16:51
(56) огромнейшая благодарность!!!!!!
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший