?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Update ooo320-m1
[ooovba.git] / sw / source / ui / envelp / label1.cxx
blob493e74c76ac1996f0564c65790e71d2092a33bb5
1 /*************************************************************************
2 *
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * Copyright 2008 by Sun Microsystems, Inc.
6 *
7 * OpenOffice.org - a multi-platform office productivity suite
8 *
9 * $RCSfile: label1.cxx,v $
10 * $Revision: 1.38 $
11 *
12 * This file is part of OpenOffice.org.
13 *
14 * OpenOffice.org is free software: you can redistribute it and/or modify
15 * it under the terms of the GNU Lesser General Public License version 3
16 * only, as published by the Free Software Foundation.
17 *
18 * OpenOffice.org is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 * GNU Lesser General Public License version 3 for more details
22 * (a copy is included in the LICENSE file that accompanied this code).
23 *
24 * You should have received a copy of the GNU Lesser General Public License
25 * version 3 along with OpenOffice.org. If not, see
26 * <http://www.openoffice.org/license.html>
27 * for a copy of the LGPLv3 License.
28 *
29 ************************************************************************/
30
31 // MARKER(update_precomp.py): autogen include statement, do not remove
32 #include "precompiled_sw.hxx"
33 #ifdef SW_DLLIMPLEMENTATION
34 #undef SW_DLLIMPLEMENTATION
35 #endif
36
37
38 #include <vcl/waitobj.hxx>
39 #include <rtl/ustring.hxx>
40 #include <com/sun/star/uno/Sequence.h>
41 #include <swtypes.hxx>
42 #include <wrtsh.hxx>
43 #include <initui.hxx>
44 #include <labimp.hxx>
45 #include <labfmt.hxx>
46 #include <labprt.hxx>
47 #include <unotools.hxx>
48 #ifndef _DBMGR_HXX
49 #include <dbmgr.hxx>
50 #endif
51 #include "uitool.hxx"
52 #ifndef _CMDID_H
53 #include <cmdid.h>
54 #endif
55 #ifndef _HELPID_H
56 #include <helpid.h>
57 #endif
58 #ifndef _GLOBALS_HRC
59 #include <globals.hrc>
60 #endif
61 #ifndef _LABEL_HRC
62 #include <label.hrc>
63 #endif
64
65 //impl in envimg.cxx
66 extern SW_DLLPUBLIC String MakeSender();
67
68
69 SV_IMPL_PTRARR( SwLabRecs, SwLabRec* );
70
71 void SwLabRec::SetFromItem( const SwLabItem& rItem )
72 {
73 lHDist = rItem.lHDist;
74 lVDist = rItem.lVDist;
75 lWidth = rItem.lWidth;
76 lHeight = rItem.lHeight;
77 lLeft = rItem.lLeft;
78 lUpper = rItem.lUpper;
79 nCols = rItem.nCols;
80 nRows = rItem.nRows;
81 bCont = rItem.bCont;
82 }
83
84 void SwLabRec::FillItem( SwLabItem& rItem ) const
85 {
86 rItem.lHDist = lHDist;
87 rItem.lVDist = lVDist;
88 rItem.lWidth = lWidth;
89 rItem.lHeight = lHeight;
90 rItem.lLeft = lLeft;
91 rItem.lUpper = lUpper;
92 rItem.nCols = nCols;
93 rItem.nRows = nRows;
94 }
95
96 // --------------------------------------------------------------------------
97 void SwLabDlg::_ReplaceGroup( const String &rMake )
98 {
99 //Die alten Eintraege vernichten.
100 pRecs->Remove( 1, pRecs->Count() - 1 );
101 aLabelsCfg.FillLabels(rtl::OUString(rMake), *pRecs);
102 aLstGroup = rMake;
103 }
104
105 // --------------------------------------------------------------------------
106
107
108
109 void SwLabDlg::PageCreated(sal_uInt16 nId, SfxTabPage &rPage)
110 {
111 if (nId == TP_LAB_LAB)
112 {
113 if(m_bLabel)
114 {
115 ((SwLabPage*)&rPage)->SetNewDBMgr(pNewDBMgr);
116 ((SwLabPage*)&rPage)->InitDatabaseBox();
117 }
118 else
119 ((SwLabPage*)&rPage)->SetToBusinessCard();
120 }
121 else if (nId == TP_LAB_PRT)
122 pPrtPage = (SwLabPrtPage*)&rPage;
123 }
124
125 // --------------------------------------------------------------------------
126
127
128
129 SwLabDlg::SwLabDlg(Window* pParent, const SfxItemSet& rSet,
130 SwNewDBMgr* pDBMgr, sal_Bool bLabel) :
131 SfxTabDialog( pParent, SW_RES(DLG_LAB), &rSet, sal_False ),
132 pNewDBMgr(pDBMgr),
133 pPrtPage(0),
134
135 aTypeIds( 50, 10 ),
136 aMakes ( 5, 0 ),
137
138 pRecs ( new SwLabRecs() ),
139 sBusinessCardDlg(SW_RES(ST_BUSINESSCARDDLG)),
140 sFormat(SW_RES(ST_FIRSTPAGE_LAB)),
141 sMedium(SW_RES(ST_FIRSTPAGE_BC)),
142 m_bLabel(bLabel)
143 {
144 WaitObject aWait( pParent );
145
146 FreeResource();
147
148 GetOKButton().SetText(String(SW_RES(STR_BTN_NEW_DOC)));
149 GetOKButton().SetHelpId(HID_LABEL_INSERT);
150 GetOKButton().SetHelpText(aEmptyStr); // Damit generierter Hilfetext verwendet wird
151
152 AddTabPage(TP_LAB_LAB, m_bLabel ? sFormat : sMedium ,SwLabPage ::Create, 0, sal_False, 0);
153 AddTabPage(TP_VISITING_CARDS, SwVisitingCardPage::Create, 0);
154 AddTabPage(TP_LAB_FMT, SwLabFmtPage::Create, 0);
155 AddTabPage(TP_LAB_PRT, SwLabPrtPage::Create, 0);
156 AddTabPage(TP_BUSINESS_DATA, SwBusinessDataPage::Create, 0 );
157 AddTabPage(TP_PRIVATE_DATA, SwPrivateDataPage::Create, 0);
158
159
160 if(m_bLabel)
161 {
162 RemoveTabPage(TP_BUSINESS_DATA);
163 RemoveTabPage(TP_PRIVATE_DATA);
164 RemoveTabPage(TP_VISITING_CARDS);
165 }
166 else
167 {
168 SetText(sBusinessCardDlg);
169 }
170 // Benutzer-Etikette aus writer.cfg lesen
171 SwLabItem aItem((const SwLabItem&)rSet.Get( FN_LABEL ));
172 SwLabRec* pRec = new SwLabRec;
173 const String aTmp( SW_RES( STR_CUSTOM ) );
174 pRec->aMake = pRec->aType = aTmp;
175 pRec->SetFromItem( aItem );
176
177 sal_Bool bDouble = sal_False;
178
179 for (sal_uInt16 nRecPos = 0; nRecPos < pRecs->Count(); nRecPos++)
180 {
181 if (pRec->aMake == pRecs->GetObject(nRecPos)->aMake &&
182 pRec->aType == pRecs->GetObject(nRecPos)->aType)
183 {
184 bDouble = sal_True;
185 break;
186 }
187 }
188
189 if (!bDouble)
190 pRecs->C40_INSERT( SwLabRec, pRec, 0 );
191
192 sal_uInt16 nLstGroup = 0;
193 const UNO_NMSPC::Sequence<rtl::OUString>& rMan = aLabelsCfg.GetManufacturers();
194 const rtl::OUString* pMan = rMan.getConstArray();
195 for(sal_Int32 nMan = 0; nMan < rMan.getLength(); nMan++)
196 {
197 aMakes.Insert( new String(pMan[nMan]), aMakes.Count() );
198 if ( pMan[nMan] == aItem.aLstMake )
199 nLstGroup = (sal_uInt16) nMan;
200 }
201
202 if ( aMakes.Count() )
203 _ReplaceGroup( *aMakes[nLstGroup] );
204 if (pExampleSet)
205 pExampleSet->Put(aItem);
206 }
207
208 // --------------------------------------------------------------------------
209
210 SwLabDlg::~SwLabDlg()
211 {
212 delete pRecs;
213 }
214 // --------------------------------------------------------------------------
215
216 void SwLabDlg::GetLabItem(SwLabItem &rItem)
217 {
218 const SwLabItem& rActItem = (const SwLabItem&)GetExampleSet()->Get(FN_LABEL);
219 const SwLabItem& rOldItem = (const SwLabItem&)GetInputSetImpl()->Get(FN_LABEL);
220
221 if (rActItem != rOldItem)
222 { // Wurde schon mal mit (hoffentlich) korrektem Inhalt "geputtet"
223 rItem = rActItem;
224 }
225 else
226 {
227 rItem = rOldItem;
228
229 // Im rItem stehen (vom Namen mal abgesehen) immer nur die
230 // benutzerdefinierbaren Einstellungen. Daher richtige Werte
231 // direkt aus dem Record besorgen:
232 SwLabRec* pRec = GetRecord(rItem.aType, rItem.bCont);
233 pRec->FillItem( rItem );
234 }
235 }
236
237 // --------------------------------------------------------------------------
238
239 SwLabRec* SwLabDlg::GetRecord(const String &rRecName, sal_Bool bCont)
240 {
241 SwLabRec* pRec = NULL;
242 sal_Bool bFound = sal_False;
243 String sCustom(SW_RES(STR_CUSTOM));
244
245 const sal_uInt16 nCount = Recs().Count();
246 for (sal_uInt16 i = 0; i < nCount; i++)
247 {
248 pRec = Recs()[i];
249 if (pRec->aType != sCustom &&
250 rRecName == pRec->aType && bCont == pRec->bCont)
251 {
252 bFound = sal_True;
253 break;
254 }
255 }
256 if (!bFound) // Benutzerdefiniert
257 pRec = Recs()[0];
258
259 return(pRec);
260 }
261
262 // --------------------------------------------------------------------------
263
264 Printer *SwLabDlg::GetPrt()
265 {
266 if (pPrtPage)
267 return (pPrtPage->GetPrt());
268 else
269 return (NULL);
270 }
271
272 // --------------------------------------------------------------------------
273 SwLabPage::SwLabPage(Window* pParent, const SfxItemSet& rSet) :
274 SfxTabPage(pParent, SW_RES(TP_LAB_LAB), rSet),
275 pNewDBMgr(NULL),
276 aItem ((const SwLabItem&) rSet.Get(FN_LABEL)),
277
278 aWritingText (this, SW_RES(TXT_WRITING)),
279 aAddrBox (this, SW_RES(BOX_ADDR )),
280 aWritingEdit (this, SW_RES(EDT_WRITING)),
281 aDatabaseFT (this, SW_RES(FT_DATABASE)),
282 aDatabaseLB (this, SW_RES(LB_DATABASE)),
283 aTableFT (this, SW_RES(FT_TABLE )),
284 aTableLB (this, SW_RES(LB_TABLE )),
285 aInsertBT (this, SW_RES(BTN_INSERT )),
286 aDBFieldFT (this, SW_RES(FT_DBFIELD )),
287 aDBFieldLB (this, SW_RES(LB_DBFIELD )),
288 aWritingFL (this, SW_RES(FL_WRITING)),
289 aContButton (this, SW_RES(BTN_CONT )),
290 aSheetButton (this, SW_RES(BTN_SHEET )),
291 aMakeText (this, SW_RES(TXT_MAKE )),
292 aMakeBox (this, SW_RES(BOX_MAKE )),
293 aTypeText (this, SW_RES(TXT_TYPE )),
294 aTypeBox (this, SW_RES(BOX_TYPE )),
295 aHiddenSortTypeBox(this, WB_SORT|WB_HIDE),
296 aFormatInfo (this, SW_RES(INF_FORMAT )),
297 aFormatFL (this, SW_RES(FL_FORMAT ))
298 {
299 WaitObject aWait( pParent );
300
301 FreeResource();
302 SetExchangeSupport();
303
304
305 // Handler installieren
306 aAddrBox .SetClickHdl (LINK(this, SwLabPage, AddrHdl ));
307 aDatabaseLB .SetSelectHdl(LINK(this, SwLabPage, DatabaseHdl ));
308 aTableLB .SetSelectHdl(LINK(this, SwLabPage, DatabaseHdl ));
309 aInsertBT .SetClickHdl (LINK(this, SwLabPage, FieldHdl ));
310 aContButton .SetClickHdl (LINK(this, SwLabPage, PageHdl ));
311 aSheetButton .SetClickHdl (LINK(this, SwLabPage, PageHdl ));
312 aMakeBox .SetSelectHdl(LINK(this, SwLabPage, MakeHdl ));
313 aTypeBox .SetSelectHdl(LINK(this, SwLabPage, TypeHdl ));
314
315 InitDatabaseBox();
316
317 sal_uInt16 nLstGroup = 0;
318
319 const sal_uInt16 nCount = (sal_uInt16)GetParent()->Makes().Count();
320 for (sal_uInt16 i = 0; i < nCount; ++i)
321 {
322 String &rStr = *GetParent()->Makes()[i];
323 aMakeBox.InsertEntry( rStr );
324 if ( rStr == String(aItem.aLstMake) )
325 nLstGroup = i;
326 }
327 // Reset(rSet);
328 aMakeBox.SelectEntryPos( nLstGroup );
329 aMakeBox.GetSelectHdl().Call( &aMakeBox );
330 }
331
332 // --------------------------------------------------------------------------
333
334
335
336 SwLabPage::~SwLabPage()
337 {
338 }
339 /* -----------------29.09.99 09:08-------------------
340
341 --------------------------------------------------*/
342 void lcl_ChgYPos(Window& rWin, long nDiff)
343 {
344 Point aTempPos(rWin.GetPosPixel());
345 aTempPos.Y() += nDiff;
346 rWin.SetPosPixel(aTempPos);
347 }
348
349 void SwLabPage::SetToBusinessCard()
350 {
351 SetHelpId(HID_BUSINESS_FMT_PAGE);
352 aContButton.SetHelpId(HID_BUSINESS_FMT_PAGE_CONT);
353 aSheetButton.SetHelpId(HID_BUSINESS_FMT_PAGE_SHEET);
354 aMakeBox.SetHelpId(HID_BUSINESS_FMT_PAGE_BRAND);
355 aTypeBox.SetHelpId(HID_BUSINESS_FMT_PAGE_TYPE);
356 m_bLabel = sal_False;
357 aWritingText.Hide();
358 aAddrBox.Hide();
359 aWritingEdit.Hide();
360 aDatabaseFT.Hide();
361 aDatabaseLB.Hide();
362 aTableFT.Hide();
363 aTableLB.Hide();
364 aInsertBT.Hide();
365 aDBFieldFT.Hide();
366 aDBFieldLB.Hide();
367 aWritingFL.Hide();
368
369 //resize the form
370 Point aFLPos(aWritingFL.GetPosPixel());
371 long nDiffPos = aFormatFL.GetPosPixel().Y() - aFLPos.Y();
372 Size aFLSz(aFormatFL.GetSizePixel());
373 // aFLSz.Height() += nDiffPos;
374 aFormatFL.SetPosSizePixel(aFLPos, aFLSz);
375
376 // move all controls up
377 lcl_ChgYPos(aContButton, -nDiffPos);
378 lcl_ChgYPos(aSheetButton, -nDiffPos);
379 lcl_ChgYPos(aMakeText, -nDiffPos);
380
381 lcl_ChgYPos(aTypeText, -nDiffPos);
382 lcl_ChgYPos(aFormatInfo, -nDiffPos);
383
384 Size aTmpSz(3, 3);
385 aTmpSz = LogicToPixel(aTmpSz, MAP_APPFONT);
386
387 lcl_ChgYPos(aMakeBox, - nDiffPos);
388 Point aLBPos(aMakeBox.GetPosPixel());
389 aLBPos.Y() += aMakeBox.GetSizePixel().Height() + aTmpSz.Height();
390 aTypeBox.SetPosPixel(aLBPos);
391 };
392
393 // --------------------------------------------------------------------------
394
395
396 IMPL_LINK( SwLabPage, AddrHdl, Button *, EMPTYARG )
397 {
398 String aWriting;
399 if ( aAddrBox.IsChecked() )
400 aWriting = MakeSender();
401 aWritingEdit.SetText( aWriting.ConvertLineEnd() );
402 aWritingEdit.GrabFocus();
403 return 0;
404 }
405
406 // --------------------------------------------------------------------------
407
408
409
410 IMPL_LINK( SwLabPage, DatabaseHdl, ListBox *, pListBox )
411 {
412 sActDBName = aDatabaseLB.GetSelectEntry();
413
414 WaitObject aObj( GetParent() );
415
416 if (pListBox == &aDatabaseLB)
417 GetNewDBMgr()->GetTableNames(&aTableLB, sActDBName);
418 GetNewDBMgr()->GetColumnNames(&aDBFieldLB, sActDBName, aTableLB.GetSelectEntry());
419 return 0;
420 }
421
422
423
424 IMPL_LINK( SwLabPage, FieldHdl, Button *, EMPTYARG )
425 {
426 String aStr ( '<' );
427 aStr += aDatabaseLB.GetSelectEntry();
428 aStr += '.';
429 aStr += aTableLB.GetSelectEntry();
430 aStr += '.';
431 aStr += aTableLB.GetEntryData(aTableLB.GetSelectEntryPos()) == 0 ? '0' : '1';
432 aStr += '.';
433 aStr += aDBFieldLB.GetSelectEntry();
434 aStr += '>';
435 aWritingEdit.ReplaceSelected(aStr);
436 Selection aSel = aWritingEdit.GetSelection();
437 aWritingEdit.GrabFocus();
438 aWritingEdit.SetSelection(aSel);
439 return 0;
440 }
441
442 // --------------------------------------------------------------------------
443
444
445
446 IMPL_LINK_INLINE_START( SwLabPage, PageHdl, Button *, EMPTYARG )
447 {
448 aMakeBox.GetSelectHdl().Call( &aMakeBox );
449 return 0;
450 }
451 IMPL_LINK_INLINE_END( SwLabPage, PageHdl, Button *, EMPTYARG )
452
453 // --------------------------------------------------------------------------
454
455
456
457 IMPL_LINK( SwLabPage, MakeHdl, ListBox *, EMPTYARG )
458 {
459 WaitObject aWait( GetParent() );
460
461 aTypeBox.Clear();
462 aHiddenSortTypeBox.Clear();
463 GetParent()->TypeIds().Remove( 0, GetParent()->TypeIds().Count() );
464
465 const String aMake = aMakeBox.GetSelectEntry();
466 GetParent()->ReplaceGroup( aMake );
467 aItem.aLstMake = aMake;
468
469 const sal_Bool bCont = aContButton.IsChecked();
470 const sal_uInt16 nCount = GetParent()->Recs().Count();
471 sal_uInt16 nLstType = 0;
472
473 const String sCustom(SW_RES(STR_CUSTOM));
474 //insert the entries into the sorted list box
475 for ( sal_uInt16 i = 0; i < nCount; ++i )
476 {
477 const String aType ( GetParent()->Recs()[i]->aType );
478 BOOL bInsert = FALSE;
479 if ( GetParent()->Recs()[i]->aType == sCustom )
480 {
481 bInsert = TRUE;
482 aTypeBox.InsertEntry(aType );
483 }
484 else if ( GetParent()->Recs()[i]->bCont == bCont )
485 {
486 if ( aHiddenSortTypeBox.GetEntryPos(aType) == LISTBOX_ENTRY_NOTFOUND )
487 {
488 bInsert = TRUE;
489 aHiddenSortTypeBox.InsertEntry( aType );
490 }
491 }
492 if(bInsert)
493 {
494 GetParent()->TypeIds().Insert(i, GetParent()->TypeIds().Count());
495 if ( !nLstType && aType == String(aItem.aLstType) )
496 nLstType = GetParent()->TypeIds().Count();
497 }
498 }
499 for(sal_uInt16 nEntry = 0; nEntry < aHiddenSortTypeBox.GetEntryCount(); nEntry++)
500 {
501 aTypeBox.InsertEntry(aHiddenSortTypeBox.GetEntry(nEntry));
502 }
503 if (nLstType)
504 aTypeBox.SelectEntry(aItem.aLstType);
505 else
506 aTypeBox.SelectEntryPos(0);
507 aTypeBox.GetSelectHdl().Call( &aTypeBox );
508 return 0;
509 }
510
511 // --------------------------------------------------------------------------
512
513
514
515 IMPL_LINK_INLINE_START( SwLabPage, TypeHdl, ListBox *, EMPTYARG )
516 {
517 DisplayFormat();
518 aItem.aType = aTypeBox.GetSelectEntry();
519 return 0;
520 }
521 IMPL_LINK_INLINE_END( SwLabPage, TypeHdl, ListBox *, EMPTYARG )
522
523 // --------------------------------------------------------------------------
524
525
526
527 void SwLabPage::DisplayFormat()
528 {
529 MetricField aField(this, WinBits(0));
530 FieldUnit aMetric = ::GetDfltMetric(FALSE);
531 SetMetric(aField, aMetric);
532 aField.SetDecimalDigits(2);
533 aField.SetMin (0);
534 aField.SetMax (LONG_MAX);
535
536 SwLabRec* pRec = GetSelectedEntryPos();
537 aItem.aLstType = pRec->aType;
538 SETFLDVAL(aField, pRec->lWidth);
539 aField.Reformat();
540 const String aWString = aField.GetText();
541
542 SETFLDVAL(aField, pRec->lHeight);
543 aField.Reformat();
544
545 String aText = pRec->aType;
546 aText.AppendAscii( RTL_CONSTASCII_STRINGPARAM( ": "));
547 aText += aWString;
548 aText.AppendAscii( RTL_CONSTASCII_STRINGPARAM(" x "));
549 aText += aField.GetText();
550 aText.AppendAscii( RTL_CONSTASCII_STRINGPARAM(" ("));
551 aText += String::CreateFromInt32( pRec->nCols );
552 aText.AppendAscii( RTL_CONSTASCII_STRINGPARAM(" x "));
553 aText += String::CreateFromInt32( pRec->nRows );
554 aText += ')';
555 aFormatInfo.SetText(aText);
556 }
557
558 // --------------------------------------------------------------------------
559
560 SwLabRec* SwLabPage::GetSelectedEntryPos()
561 {
562 String sSelEntry(aTypeBox.GetSelectEntry());
563
564 return GetParent()->GetRecord(sSelEntry, aContButton.IsChecked());
565 }
566
567 // --------------------------------------------------------------------------
568
569
570
571 void SwLabPage::InitDatabaseBox()
572 {
573 if( GetNewDBMgr() )
574 {
575 aDatabaseLB.Clear();
576 UNO_NMSPC::Sequence<rtl::OUString> aDataNames = SwNewDBMgr::GetExistingDatabaseNames();
577 const rtl::OUString* pDataNames = aDataNames.getConstArray();
578 for (long i = 0; i < aDataNames.getLength(); i++)
579 aDatabaseLB.InsertEntry(pDataNames[i]);
580 String sDBName = sActDBName.GetToken( 0, DB_DELIM );
581 String sTableName = sActDBName.GetToken( 1, DB_DELIM );
582 aDatabaseLB.SelectEntry(sDBName);
583 if( sDBName.Len() && GetNewDBMgr()->GetTableNames(&aTableLB, sDBName))
584 {
585 aTableLB.SelectEntry(sTableName);
586 GetNewDBMgr()->GetColumnNames(&aDBFieldLB, sActDBName, sTableName);
587 }
588 else
589 aDBFieldLB.Clear();
590 }
591 }
592
593 // --------------------------------------------------------------------------
594 SfxTabPage* SwLabPage::Create(Window* pParent, const SfxItemSet& rSet)
595 {
596 return new SwLabPage(pParent, rSet);
597 }
598
599 // --------------------------------------------------------------------------
600 void SwLabPage::ActivatePage(const SfxItemSet& rSet)
601 {
602 Reset( rSet );
603 }
604 // --------------------------------------------------------------------------
605 int SwLabPage::DeactivatePage(SfxItemSet* _pSet)
606 {
607 if (_pSet)
608 FillItemSet(*_pSet);
609
610 return sal_True;
611 }
612
613 // --------------------------------------------------------------------------
614
615
616
617 void SwLabPage::FillItem(SwLabItem& rItem)
618 {
619 rItem.bAddr = aAddrBox.IsChecked();
620 rItem.aWriting = aWritingEdit.GetText();
621 rItem.bCont = aContButton.IsChecked();
622 rItem.aMake = aMakeBox.GetSelectEntry();
623 rItem.aType = aTypeBox.GetSelectEntry();
624 rItem.sDBName = sActDBName;
625
626 SwLabRec* pRec = GetSelectedEntryPos();
627 pRec->FillItem( rItem );
628
629 rItem.aLstMake = aMakeBox.GetSelectEntry();
630 rItem.aLstType = aTypeBox.GetSelectEntry();
631 }
632
633 // --------------------------------------------------------------------------
634
635
636
637 sal_Bool SwLabPage::FillItemSet(SfxItemSet& rSet)
638 {
639 FillItem( aItem );
640 rSet.Put( aItem );
641
642 return sal_True;
643 }
644
645 // --------------------------------------------------------------------------
646
647 void SwLabPage::Reset(const SfxItemSet& rSet)
648 {
649 aItem = (const SwLabItem&) rSet.Get(FN_LABEL);
650 String sDBName = aItem.sDBName;
651
652 String aWriting( aItem.aWriting );
653
654 aAddrBox .Check ( aItem.bAddr );
655 aWritingEdit.SetText ( aWriting.ConvertLineEnd() );
656
657 const sal_uInt16 nCount = (sal_uInt16)GetParent()->Makes().Count();
658 for (sal_uInt16 i = 0; i < nCount; ++i)
659 {
660 String &rStr = *GetParent()->Makes()[i];
661 if(aMakeBox.GetEntryPos(String(rStr)) == LISTBOX_ENTRY_NOTFOUND)
662 aMakeBox.InsertEntry( rStr );
663 }
664
665
666 aMakeBox .SelectEntry( aItem.aMake );
667 //save the current type
668 String sType(aItem.aType);
669 aMakeBox.GetSelectHdl().Call( &aMakeBox );
670 aItem.aType = sType;
671 //#102806# a newly added make may not be in the type ListBox already
672 if (aTypeBox.GetEntryPos(String(aItem.aType)) == LISTBOX_ENTRY_NOTFOUND && aItem.aMake.getLength())
673 GetParent()->UpdateGroup( aItem.aMake );
674 if (aTypeBox.GetEntryPos(String(aItem.aType)) != LISTBOX_ENTRY_NOTFOUND)
675 {
676 aTypeBox.SelectEntry(aItem.aType);
677 aTypeBox.GetSelectHdl().Call(&aTypeBox);
678 }
679 if (aDatabaseLB.GetEntryPos(sDBName) != LISTBOX_ENTRY_NOTFOUND)
680 {
681 aDatabaseLB.SelectEntry(sDBName);
682 aDatabaseLB.GetSelectHdl().Call(&aDatabaseLB);
683 }
684
685 if (aItem.bCont)
686 aContButton .Check();
687 else
688 aSheetButton.Check();
689 }
690
691 /*-- 08.07.99 14:00:02---------------------------------------------------
692
693 -----------------------------------------------------------------------*/
694 //-----------------------------------------------------------------------------
695 void SwVisitingCardPage::ClearUserData()
696 {
697 SvLBoxEntry* pEntry = aAutoTextLB.First();
698 while(pEntry)
699 {
700 delete (String*)pEntry->GetUserData();
701 pEntry = aAutoTextLB.Next(pEntry);
702 }
703 }
704
705 //-----------------------------------------------------------------------------
706
707 void SwVisitingCardPage::SetUserData( sal_uInt32 nCnt,
708 const rtl::OUString* pNames, const rtl::OUString* pValues )
709 {
710 for( sal_uInt32 i = 0; i < nCnt; ++i )
711 {
712 SvLBoxEntry* pEntry = aAutoTextLB.InsertEntry( pNames[ i ] );
713 pEntry->SetUserData( new String( pValues[ i ] ));
714 }
715 }
716
717 //-----------------------------------------------------------------------------
718
719 SwVisitingCardPage::SwVisitingCardPage(Window* pParent, const SfxItemSet& rSet) :
720 SfxTabPage(pParent, SW_RES(TP_VISITING_CARDS), rSet),
721 aAutoTextLB(this, SW_RES( LB_AUTO_TEXT )),
722 aAutoTextGroupFT(this, SW_RES( FT_AUTO_TEXT_GROUP )),
723 aAutoTextGroupLB(this, SW_RES( LB_AUTO_TEXT_GROUP )),
724 aContentFL(this, SW_RES( FL_CONTENT )),
725 aExampleWIN(this, SW_RES( WIN_EXAMPLE )),
726 sVisCardGroup(SW_RES(ST_VISCARD_GROUP)),
727 pExampleFrame(0)
728 {
729 FreeResource();
730 aAutoTextLB.SetWindowBits( WB_HSCROLL );
731 aAutoTextLB.SetSpaceBetweenEntries(0);
732 aAutoTextLB.SetSelectionMode( SINGLE_SELECTION );
733 aAutoTextLB.SetHelpId(HID_BUSINESS_CARD_CONTENT);
734
735 SetExchangeSupport();
736 aAutoTextLB.SetSelectHdl(LINK(this, SwVisitingCardPage, AutoTextSelectHdl));
737 aAutoTextGroupLB.SetSelectHdl(LINK(this, SwVisitingCardPage, AutoTextSelectHdl));
738
739 aExampleWIN.Hide();
740
741 aAutoTextLB.Show();
742 aAutoTextGroupFT.Show();
743 aAutoTextGroupLB.Show();
744 InitFrameControl();
745 }
746 /*-- 08.07.99 14:00:03---------------------------------------------------
747
748 -----------------------------------------------------------------------*/
749 SwVisitingCardPage::~SwVisitingCardPage()
750 {
751 for(sal_uInt16 i = 0; i < aAutoTextGroupLB.GetEntryCount(); i++)
752 delete (String*)aAutoTextGroupLB.GetEntryData( i );
753 _xAutoText = 0;
754
755 ClearUserData();
756 delete pExampleFrame;
757 }
758 /*-- 08.07.99 14:00:03---------------------------------------------------
759
760 -----------------------------------------------------------------------*/
761 SfxTabPage* SwVisitingCardPage::Create(Window* pParent, const SfxItemSet& rSet)
762 {
763 return new SwVisitingCardPage(pParent, rSet);
764 }
765 /*-- 08.07.99 14:00:03---------------------------------------------------
766
767 -----------------------------------------------------------------------*/
768 void SwVisitingCardPage::ActivatePage(const SfxItemSet& rSet)
769 {
770 Reset( rSet );
771 UpdateFields();
772 }
773 /*-- 08.07.99 14:00:04---------------------------------------------------
774
775 -----------------------------------------------------------------------*/
776 int SwVisitingCardPage::DeactivatePage(SfxItemSet* _pSet)
777 {
778 if (_pSet)
779 FillItemSet(*_pSet);
780 return LEAVE_PAGE;
781 }
782 /*-- 08.07.99 14:00:04---------------------------------------------------
783
784 -----------------------------------------------------------------------*/
785 sal_Bool SwVisitingCardPage::FillItemSet(SfxItemSet& rSet)
786 {
787 String* pGroup = (String*)aAutoTextGroupLB.GetEntryData(
788 aAutoTextGroupLB.GetSelectEntryPos());
789 DBG_ASSERT(pGroup, "no group selected?");
790 if(pGroup)
791 aLabItem.sGlossaryGroup = *pGroup;
792
793 SvLBoxEntry* pSelEntry = aAutoTextLB.FirstSelected();
794 if(pSelEntry)
795 aLabItem.sGlossaryBlockName = *(String*)pSelEntry->GetUserData();
796 rSet.Put(aLabItem);
797 return sal_True;
798 }
799 /*-- 08.07.99 14:00:05---------------------------------------------------
800
801 -----------------------------------------------------------------------*/
802 void lcl_SelectBlock(SvTreeListBox& rAutoTextLB, const String& rBlockName)
803 {
804 SvLBoxEntry* pEntry = rAutoTextLB.First();
805 while(pEntry)
806 {
807 if(*(String*)pEntry->GetUserData() == rBlockName)
808 {
809 rAutoTextLB.Select(pEntry);
810 rAutoTextLB.MakeVisible(pEntry);
811 break;
812 }
813 pEntry = rAutoTextLB.Next(pEntry);
814 }
815 }
816 //-----------------------------------------------------------------------------
817 sal_Bool lcl_FindBlock(SvTreeListBox& rAutoTextLB, const String& rBlockName)
818 {
819 SvLBoxEntry* pEntry = rAutoTextLB.First();
820 while(pEntry)
821 {
822 if(*(String*)pEntry->GetUserData() == rBlockName)
823 {
824 rAutoTextLB.Select(pEntry);
825 return sal_True;
826 }
827 pEntry = rAutoTextLB.Next(pEntry);
828 }
829 return sal_False;
830 }
831
832 //-----------------------------------------------------------------------------
833 void SwVisitingCardPage::Reset(const SfxItemSet& rSet)
834 {
835 aLabItem = (const SwLabItem&) rSet.Get(FN_LABEL);
836
837 sal_Bool bFound = sal_False;
838 sal_uInt16 i;
839 for(i = 0; i < aAutoTextGroupLB.GetEntryCount() && !bFound; i++)
840 if( String(aLabItem.sGlossaryGroup) ==
841 *(String*)aAutoTextGroupLB.GetEntryData( i ))
842 {
843 bFound = sal_True;
844 break;
845 }
846
847 if(!bFound)
848 {
849 // initially search for a group starting with "crd" which is the name of the
850 // business card AutoTexts
851 for(i = 0; i < aAutoTextGroupLB.GetEntryCount() && !bFound; i++)
852 if(0 == (*(String*)aAutoTextGroupLB.GetEntryData( i )).SearchAscii( "crd") )
853 {
854 bFound = sal_True;
855 break;
856 }
857 }
858 if(bFound)
859 {
860 if(aAutoTextGroupLB.GetSelectEntryPos() != i)
861 {
862 aAutoTextGroupLB.SelectEntryPos(i);
863 AutoTextSelectHdl(&aAutoTextGroupLB);
864 }
865 if(lcl_FindBlock(aAutoTextLB, aLabItem.sGlossaryBlockName))
866 {
867 SvLBoxEntry* pSelEntry = aAutoTextLB.FirstSelected();
868 if( pSelEntry &&
869 *(String*)pSelEntry->GetUserData() != String(aLabItem.sGlossaryBlockName))
870 {
871 lcl_SelectBlock(aAutoTextLB, aLabItem.sGlossaryBlockName);
872 AutoTextSelectHdl(&aAutoTextLB);
873 }
874 }
875 }
876 }
877
878 /* -----------------29.09.99 08:55-------------------
879
880 --------------------------------------------------*/
881 SwPrivateDataPage::SwPrivateDataPage(Window* pParent, const SfxItemSet& rSet) :
882 SfxTabPage(pParent, SW_RES(TP_PRIVATE_DATA), rSet),
883 aDataFL (this, SW_RES( FL_DATA )),
884
885 aNameFT (this, SW_RES( FT_NAME )),
886 aFirstNameED (this, SW_RES( ED_FIRSTNAME )),
887 aNameED (this, SW_RES( ED_NAME )),
888 aShortCutED (this, SW_RES( ED_SHORTCUT )),
889
890 aName2FT (this, SW_RES( FT_NAME_2 )),
891 aFirstName2ED (this, SW_RES( ED_FIRSTNAME_2)),
892 aName2ED (this, SW_RES( ED_NAME_2 )),
893 aShortCut2ED (this, SW_RES( ED_SHORTCUT_2 )),
894
895 aStreetFT (this, SW_RES( FT_STREET )),
896 aStreetED (this, SW_RES( ED_STREET )),
897 aZipCityFT (this, SW_RES( FT_ZIPCITY )),
898 aZipED (this, SW_RES( ED_ZIP )),
899 aCityED (this, SW_RES( ED_CITY )),
900 aCountryStateFT (this, SW_RES( FT_COUNTRYSTATE )),
901 aCountryED (this, SW_RES( ED_COUNTRY )),
902 aStateED (this, SW_RES( ED_STATE )),
903 aTitleProfessionFT (this, SW_RES( FT_TITLEPROF )),
904 aTitleED (this, SW_RES( ED_TITLE )),
905 aProfessionED (this, SW_RES( ED_PROFESSION )),
906 aPhoneFT (this, SW_RES( FT_PHONE_MOBILE )),
907 aPhoneED (this, SW_RES( ED_PHONE )),
908 aMobilePhoneED (this, SW_RES( ED_MOBILE )),
909 aFaxFT (this, SW_RES( FT_FAX )),
910 aFaxED (this, SW_RES( ED_FAX )),
911 aWWWMailFT (this, SW_RES( FT_WWWMAIL )),
912 aHomePageED (this, SW_RES( ED_WWW )),
913 aMailED (this, SW_RES( ED_MAIL ))
914 {
915 FreeResource();
916 SetExchangeSupport();
917 }
918
919 /*-- 29.09.99 08:55:57---------------------------------------------------
920
921 -----------------------------------------------------------------------*/
922 SwPrivateDataPage::~SwPrivateDataPage()
923 {
924 }
925 /*-- 29.09.99 08:55:57---------------------------------------------------
926
927 -----------------------------------------------------------------------*/
928 SfxTabPage* SwPrivateDataPage::Create(Window* pParent, const SfxItemSet& rSet)
929 {
930 return new SwPrivateDataPage(pParent, rSet);
931 }
932 /*-- 29.09.99 08:55:57---------------------------------------------------
933
934 -----------------------------------------------------------------------*/
935 void SwPrivateDataPage::ActivatePage(const SfxItemSet& rSet)
936 {
937 Reset(rSet);
938 }
939 /*-- 29.09.99 08:55:58---------------------------------------------------
940
941 -----------------------------------------------------------------------*/
942 int SwPrivateDataPage::DeactivatePage(SfxItemSet* _pSet)
943 {
944 if (_pSet)
945 FillItemSet(*_pSet);
946 return LEAVE_PAGE;
947 }
948 /*-- 29.09.99 08:55:58---------------------------------------------------
949
950 -----------------------------------------------------------------------*/
951 sal_Bool SwPrivateDataPage::FillItemSet(SfxItemSet& rSet)
952 {
953
954 SwLabItem aItem = (const SwLabItem&) GetTabDialog()->GetExampleSet()->Get(FN_LABEL);
955 aItem.aPrivFirstName = aFirstNameED .GetText();
956 aItem.aPrivName = aNameED .GetText( );
957 aItem.aPrivShortCut = aShortCutED .GetText( );
958 aItem.aPrivFirstName2 = aFirstName2ED .GetText();
959 aItem.aPrivName2 = aName2ED .GetText( );
960 aItem.aPrivShortCut2 = aShortCut2ED .GetText( );
961 aItem.aPrivStreet = aStreetED .GetText( );
962 aItem.aPrivZip = aZipED .GetText( );
963 aItem.aPrivCity = aCityED .GetText( );
964 aItem.aPrivCountry = aCountryED .GetText( );
965 aItem.aPrivState = aStateED .GetText( );
966 aItem.aPrivTitle = aTitleED .GetText( );
967 aItem.aPrivProfession= aProfessionED.GetText( );
968 aItem.aPrivPhone = aPhoneED .GetText( );
969 aItem.aPrivMobile = aMobilePhoneED.GetText( );
970 aItem.aPrivFax = aFaxED .GetText( );
971 aItem.aPrivWWW = aHomePageED .GetText( );
972 aItem.aPrivMail = aMailED .GetText( );
973
974 rSet.Put(aItem);
975 return sal_True;
976 }
977 /*-- 29.09.99 08:55:59---------------------------------------------------
978
979 -----------------------------------------------------------------------*/
980 void SwPrivateDataPage::Reset(const SfxItemSet& rSet)
981 {
982 const SwLabItem& aItem = (const SwLabItem&) rSet.Get(FN_LABEL);
983 aFirstNameED.SetText(aItem.aPrivFirstName);
984 aNameED .SetText(aItem.aPrivName);
985 aShortCutED .SetText(aItem.aPrivShortCut);
986 aFirstName2ED.SetText(aItem.aPrivFirstName2);
987 aName2ED .SetText(aItem.aPrivName2);
988 aShortCut2ED .SetText(aItem.aPrivShortCut2);
989 aStreetED .SetText(aItem.aPrivStreet);
990 aZipED .SetText(aItem.aPrivZip);
991 aCityED .SetText(aItem.aPrivCity);
992 aCountryED .SetText(aItem.aPrivCountry);
993 aStateED .SetText(aItem.aPrivState);
994 aTitleED .SetText(aItem.aPrivTitle);
995 aProfessionED.SetText(aItem.aPrivProfession);
996 aPhoneED .SetText(aItem.aPrivPhone);
997 aMobilePhoneED.SetText(aItem.aPrivMobile);
998 aFaxED .SetText(aItem.aPrivFax);
999 aHomePageED .SetText(aItem.aPrivWWW);
1000 aMailED .SetText(aItem.aPrivMail);
1001 }
1002 /* -----------------29.09.99 08:56-------------------
1003
1004 --------------------------------------------------*/
1005 SwBusinessDataPage::SwBusinessDataPage(Window* pParent, const SfxItemSet& rSet) :
1006 SfxTabPage(pParent, SW_RES(TP_BUSINESS_DATA), rSet),
1007 aDataFL (this, SW_RES( FL_DATA )),
1008 aCompanyFT (this, SW_RES( FT_COMP )),
1009 aCompanyED (this, SW_RES( ED_COMP )),
1010 aCompanyExtFT (this, SW_RES( FT_COMP_EXT )),
1011 aCompanyExtED (this, SW_RES( ED_COMP_EXT )),
1012 aSloganFT (this, SW_RES( FT_SLOGAN )),
1013 aSloganED (this, SW_RES( ED_SLOGAN )),
1014 aStreetFT (this, SW_RES( FT_STREET )),
1015 aStreetED (this, SW_RES( ED_STREET )),
1016 aZipCityFT (this, SW_RES( FT_ZIPCITY )),
1017 aZipED (this, SW_RES( ED_ZIP )),
1018 aCityED (this, SW_RES( ED_CITY )),
1019 aCountryStateFT (this, SW_RES( FT_COUNTRYSTATE )),
1020 aCountryED (this, SW_RES( ED_COUNTRY )),
1021 aStateED (this, SW_RES( ED_STATE )),
1022 aPositionFT (this, SW_RES( FT_POSITION )),
1023 aPositionED (this, SW_RES( ED_POSITION )),
1024 aPhoneFT (this, SW_RES( FT_PHONE_MOBILE )),
1025 aPhoneED (this, SW_RES( ED_PHONE )),
1026 aMobilePhoneED (this, SW_RES( ED_MOBILE )),
1027 aFaxFT (this, SW_RES( FT_FAX )),
1028 aFaxED (this, SW_RES( ED_FAX )),
1029 aWWWMailFT (this, SW_RES( FT_WWWMAIL )),
1030 aHomePageED (this, SW_RES( ED_WWW )),
1031 aMailED (this, SW_RES( ED_MAIL ))
1032 {
1033 FreeResource();
1034 SetExchangeSupport();
1035 }
1036
1037 /*-- 29.09.99 08:56:06---------------------------------------------------
1038
1039 -----------------------------------------------------------------------*/
1040 SwBusinessDataPage::~SwBusinessDataPage()
1041 {
1042 }
1043 /*-- 29.09.99 08:56:06---------------------------------------------------
1044
1045 -----------------------------------------------------------------------*/
1046 SfxTabPage* SwBusinessDataPage::Create(Window* pParent, const SfxItemSet& rSet)
1047 {
1048 return new SwBusinessDataPage(pParent, rSet);
1049 }
1050 /*-- 29.09.99 08:56:06---------------------------------------------------
1051
1052 -----------------------------------------------------------------------*/
1053 void SwBusinessDataPage::ActivatePage(const SfxItemSet& rSet)
1054 {
1055 Reset(rSet);
1056 }
1057 /*-- 29.09.99 08:56:06---------------------------------------------------
1058
1059 -----------------------------------------------------------------------*/
1060 int SwBusinessDataPage::DeactivatePage(SfxItemSet* _pSet)
1061 {
1062 if (_pSet)
1063 FillItemSet(*_pSet);
1064 return LEAVE_PAGE;
1065 }
1066 /*-- 29.09.99 08:56:06---------------------------------------------------
1067
1068 -----------------------------------------------------------------------*/
1069 sal_Bool SwBusinessDataPage::FillItemSet(SfxItemSet& rSet)
1070 {
1071 SwLabItem aItem = (const SwLabItem&) GetTabDialog()->GetExampleSet()->Get(FN_LABEL);
1072
1073 aItem.aCompCompany = aCompanyED .GetText();
1074 aItem.aCompCompanyExt= aCompanyExtED .GetText();
1075 aItem.aCompSlogan = aSloganED .GetText();
1076 aItem.aCompStreet = aStreetED .GetText();
1077 aItem.aCompZip = aZipED .GetText();
1078 aItem.aCompCity = aCityED .GetText();
1079 aItem.aCompCountry = aCountryED .GetText();
1080 aItem.aCompState = aStateED .GetText();
1081 aItem.aCompPosition = aPositionED .GetText();
1082 aItem.aCompPhone = aPhoneED .GetText();
1083 aItem.aCompMobile = aMobilePhoneED .GetText();
1084 aItem.aCompFax = aFaxED .GetText();
1085 aItem.aCompWWW = aHomePageED .GetText();
1086 aItem.aCompMail = aMailED .GetText();
1087
1088 rSet.Put(aItem);
1089 return sal_True;
1090 }
1091 /*-- 29.09.99 08:56:07---------------------------------------------------
1092
1093 -----------------------------------------------------------------------*/
1094 void SwBusinessDataPage::Reset(const SfxItemSet& rSet)
1095 {
1096 const SwLabItem& aItem = (const SwLabItem&) rSet.Get(FN_LABEL);
1097 aCompanyED .SetText(aItem.aCompCompany);
1098 aCompanyExtED .SetText(aItem.aCompCompanyExt);
1099 aSloganED .SetText(aItem.aCompSlogan);
1100 aStreetED .SetText(aItem.aCompStreet);
1101 aZipED .SetText(aItem.aCompZip);
1102 aCityED .SetText(aItem.aCompCity);
1103 aCountryED .SetText(aItem.aCompCountry);
1104 aStateED .SetText(aItem.aCompState);
1105 aPositionED .SetText(aItem.aCompPosition);
1106 aPhoneED .SetText(aItem.aCompPhone);
1107 aMobilePhoneED .SetText(aItem.aCompMobile);
1108 aFaxED .SetText(aItem.aCompFax);
1109 aHomePageED .SetText(aItem.aCompWWW);
1110 aMailED .SetText(aItem.aCompMail);
1111 }
1112
1113
1114
vba interoperability for OOo