Line data Source code
1 : /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
2 : /*
3 : * This file is part of the LibreOffice project.
4 : *
5 : * This Source Code Form is subject to the terms of the Mozilla Public
6 : * License, v. 2.0. If a copy of the MPL was not distributed with this
7 : * file, You can obtain one at http://mozilla.org/MPL/2.0/.
8 : *
9 : * This file incorporates work covered by the following license notice:
10 : *
11 : * Licensed to the Apache Software Foundation (ASF) under one or more
12 : * contributor license agreements. See the NOTICE file distributed
13 : * with this work for additional information regarding copyright
14 : * ownership. The ASF licenses this file to you under the Apache
15 : * License, Version 2.0 (the "License"); you may not use this file
16 : * except in compliance with the License. You may obtain a copy of
17 : * the License at http://www.apache.org/licenses/LICENSE-2.0 .
18 : */
19 :
20 : #include <sfx2/app.hxx>
21 : #include <basic/basmgr.hxx>
22 : #include <basic/sbmod.hxx>
23 : #include <docsh.hxx>
24 : #include <swtypes.hxx>
25 : #include <globals.hrc>
26 : #include <fldbas.hxx>
27 : #include <docufld.hxx>
28 : #include <view.hxx>
29 : #include <wrtsh.hxx>
30 : #include <swmodule.hxx>
31 : #include <fldfunc.hxx>
32 : #include <flddropdown.hxx>
33 : #include <fldui.hrc>
34 :
35 : #define USER_DATA_VERSION_1 "1"
36 : #define USER_DATA_VERSION USER_DATA_VERSION_1
37 :
38 : using namespace ::com::sun::star;
39 :
40 0 : SwFieldFuncPage::SwFieldFuncPage(vcl::Window* pParent, const SfxItemSet& rCoreSet)
41 : : SwFieldPage(pParent, "FieldFuncPage",
42 : "modules/swriter/ui/fldfuncpage.ui", rCoreSet)
43 : , nOldFormat(0)
44 0 : , bDropDownLBChanged(false)
45 : {
46 0 : get(m_pTypeLB, "type");
47 0 : get(m_pFormat, "formatframe");
48 0 : get(m_pSelectionLB, "select");
49 0 : get(m_pFormatLB, "format");
50 0 : get(m_pNameFT, "nameft");
51 0 : get(m_pNameED, "name");
52 0 : get(m_pValueGroup, "valuegroup");
53 0 : get(m_pValueFT, "valueft");
54 0 : get(m_pValueED, "value");
55 0 : get(m_pCond1FT, "cond1ft");
56 0 : get(m_pCond1ED, "cond1");
57 0 : get(m_pCond2FT, "cond2ft");
58 0 : get(m_pCond2ED, "cond2");
59 0 : get(m_pMacroBT, "macro");
60 :
61 0 : get(m_pListGroup, "listgroup");
62 0 : get(m_pListItemFT, "itemft");
63 0 : get(m_pListItemED, "item");
64 0 : get(m_pListAddPB, "add");
65 0 : get(m_pListItemsFT, "listitemft");
66 0 : get(m_pListItemsLB, "listitems");
67 0 : m_pListItemsLB->SetDropDownLineCount(5);
68 0 : m_pListItemsLB->set_width_request(m_pListItemED->GetOptimalSize().Width());
69 0 : get(m_pListRemovePB, "remove");
70 0 : get(m_pListUpPB, "up");
71 0 : get(m_pListDownPB, "down");
72 0 : get(m_pListNameFT, "listnameft");
73 0 : get(m_pListNameED, "listname");
74 :
75 0 : long nHeight = m_pTypeLB->GetTextHeight() * 20;
76 0 : m_pTypeLB->set_height_request(nHeight);
77 0 : m_pFormatLB->set_height_request(nHeight);
78 :
79 0 : long nWidth = m_pTypeLB->LogicToPixel(Size(FIELD_COLUMN_WIDTH, 0), MapMode(MAP_APPFONT)).Width();
80 0 : m_pTypeLB->set_width_request(nWidth);
81 0 : m_pFormatLB->set_width_request(nWidth);
82 :
83 0 : m_pNameED->SetModifyHdl(LINK(this, SwFieldFuncPage, ModifyHdl));
84 :
85 0 : m_sOldValueFT = m_pValueFT->GetText();
86 0 : m_sOldNameFT = m_pNameFT->GetText();
87 :
88 0 : m_pCond1ED->ShowBrackets(false);
89 0 : m_pCond2ED->ShowBrackets(false);
90 0 : }
91 :
92 0 : SwFieldFuncPage::~SwFieldFuncPage()
93 : {
94 0 : disposeOnce();
95 0 : }
96 :
97 0 : void SwFieldFuncPage::dispose()
98 : {
99 0 : m_pTypeLB.clear();
100 0 : m_pSelectionLB.clear();
101 0 : m_pFormat.clear();
102 0 : m_pFormatLB.clear();
103 0 : m_pNameFT.clear();
104 0 : m_pNameED.clear();
105 0 : m_pValueGroup.clear();
106 0 : m_pValueFT.clear();
107 0 : m_pValueED.clear();
108 0 : m_pCond1FT.clear();
109 0 : m_pCond1ED.clear();
110 0 : m_pCond2FT.clear();
111 0 : m_pCond2ED.clear();
112 0 : m_pMacroBT.clear();
113 0 : m_pListGroup.clear();
114 0 : m_pListItemFT.clear();
115 0 : m_pListItemED.clear();
116 0 : m_pListAddPB.clear();
117 0 : m_pListItemsFT.clear();
118 0 : m_pListItemsLB.clear();
119 0 : m_pListRemovePB.clear();
120 0 : m_pListUpPB.clear();
121 0 : m_pListDownPB.clear();
122 0 : m_pListNameFT.clear();
123 0 : m_pListNameED.clear();
124 0 : SwFieldPage::dispose();
125 0 : }
126 :
127 0 : void SwFieldFuncPage::Reset(const SfxItemSet* )
128 : {
129 0 : SavePos(m_pTypeLB);
130 0 : Init(); // general initialisation
131 :
132 0 : m_pTypeLB->SetUpdateMode(false);
133 0 : m_pTypeLB->Clear();
134 :
135 : sal_Int32 nPos;
136 :
137 0 : if (!IsFieldEdit())
138 : {
139 : // initialise TypeListBox
140 0 : const SwFieldGroupRgn& rRg = SwFieldMgr::GetGroupRange(IsFieldDlgHtmlMode(), GetGroup());
141 :
142 : // fill Typ-Listbox
143 0 : for(sal_uInt16 i = rRg.nStart; i < rRg.nEnd; ++i)
144 : {
145 0 : const sal_uInt16 nTypeId = SwFieldMgr::GetTypeId(i);
146 0 : nPos = m_pTypeLB->InsertEntry(SwFieldMgr::GetTypeStr(i));
147 0 : m_pTypeLB->SetEntryData(nPos, reinterpret_cast<void*>(nTypeId));
148 : }
149 : }
150 : else
151 : {
152 0 : const sal_uInt16 nTypeId = GetCurField()->GetTypeId();
153 0 : nPos = m_pTypeLB->InsertEntry(SwFieldMgr::GetTypeStr(SwFieldMgr::GetPos(nTypeId)));
154 0 : m_pTypeLB->SetEntryData(nPos, reinterpret_cast<void*>(nTypeId));
155 :
156 0 : if (nTypeId == TYP_MACROFLD)
157 : {
158 0 : GetFieldMgr().SetMacroPath(GetCurField()->GetPar1());
159 : }
160 : }
161 :
162 : // select old Pos
163 0 : RestorePos(m_pTypeLB);
164 :
165 0 : m_pTypeLB->SetDoubleClickHdl (LINK(this, SwFieldFuncPage, InsertHdl));
166 0 : m_pTypeLB->SetSelectHdl (LINK(this, SwFieldFuncPage, TypeHdl));
167 0 : m_pSelectionLB->SetSelectHdl (LINK(this, SwFieldFuncPage, SelectHdl));
168 0 : m_pSelectionLB->SetDoubleClickHdl (LINK(this, SwFieldFuncPage, InsertMacroHdl));
169 0 : m_pFormatLB->SetDoubleClickHdl (LINK(this, SwFieldFuncPage, InsertHdl));
170 0 : m_pMacroBT->SetClickHdl (LINK(this, SwFieldFuncPage, MacroHdl));
171 0 : Link<> aListModifyLk( LINK(this, SwFieldFuncPage, ListModifyHdl));
172 0 : m_pListAddPB->SetClickHdl(aListModifyLk);
173 0 : m_pListRemovePB->SetClickHdl(aListModifyLk);
174 0 : m_pListUpPB->SetClickHdl(aListModifyLk);
175 0 : m_pListDownPB->SetClickHdl(aListModifyLk);
176 0 : m_pListItemED->SetReturnActionLink(aListModifyLk);
177 0 : Link<> aListEnableLk = LINK(this, SwFieldFuncPage, ListEnableHdl);
178 0 : m_pListItemED->SetModifyHdl(aListEnableLk);
179 0 : m_pListItemsLB->SetSelectHdl(aListEnableLk);
180 :
181 0 : if( !IsRefresh() )
182 : {
183 0 : OUString sUserData = GetUserData();
184 0 : if(sUserData.getToken(0, ';').equalsIgnoreAsciiCase(USER_DATA_VERSION_1))
185 : {
186 0 : OUString sVal = sUserData.getToken(1, ';');
187 0 : const sal_uInt16 nVal = static_cast< sal_uInt16 >(sVal.toInt32());
188 0 : if(nVal != USHRT_MAX)
189 : {
190 0 : for(sal_Int32 i = 0; i < m_pTypeLB->GetEntryCount(); i++)
191 0 : if(nVal == (sal_uInt16)reinterpret_cast<sal_uLong>(m_pTypeLB->GetEntryData(i)))
192 : {
193 0 : m_pTypeLB->SelectEntryPos(i);
194 0 : break;
195 : }
196 0 : }
197 0 : }
198 : }
199 0 : TypeHdl(0);
200 :
201 0 : m_pTypeLB->SetUpdateMode(true);
202 :
203 0 : if (IsFieldEdit())
204 : {
205 0 : m_pNameED->SaveValue();
206 0 : m_pValueED->SaveValue();
207 0 : m_pCond1ED->SaveValue();
208 0 : m_pCond2ED->SaveValue();
209 0 : nOldFormat = GetCurField()->GetFormat();
210 : }
211 0 : }
212 :
213 0 : IMPL_LINK_NOARG(SwFieldFuncPage, TypeHdl)
214 : {
215 : // save old ListBoxPos
216 0 : const sal_Int32 nOld = GetTypeSel();
217 :
218 : // current ListBoxPos
219 0 : SetTypeSel(m_pTypeLB->GetSelectEntryPos());
220 :
221 0 : if(GetTypeSel() == LISTBOX_ENTRY_NOTFOUND)
222 : {
223 0 : SetTypeSel(0);
224 0 : m_pTypeLB->SelectEntryPos(0);
225 : }
226 :
227 0 : if (nOld != GetTypeSel())
228 : {
229 0 : const sal_uInt16 nTypeId = (sal_uInt16)reinterpret_cast<sal_uLong>(m_pTypeLB->GetEntryData(GetTypeSel()));
230 :
231 : // fill Selection-Listbox
232 0 : UpdateSubType();
233 :
234 : // fill Format-Listbox
235 0 : m_pFormatLB->Clear();
236 :
237 0 : const sal_uInt16 nSize = GetFieldMgr().GetFormatCount(nTypeId, false, IsFieldDlgHtmlMode());
238 :
239 0 : for (sal_uInt16 i = 0; i < nSize; i++)
240 : {
241 0 : sal_Int32 nPos = m_pFormatLB->InsertEntry(GetFieldMgr().GetFormatStr(nTypeId, i));
242 0 : m_pFormatLB->SetEntryData( nPos, reinterpret_cast<void*>(GetFieldMgr().GetFormatId( nTypeId, i )) );
243 : }
244 :
245 0 : if (nSize)
246 : {
247 0 : if (IsFieldEdit() && nTypeId == TYP_JUMPEDITFLD)
248 0 : m_pFormatLB->SelectEntry(SW_RESSTR(FMT_MARK_BEGIN + GetCurField()->GetFormat()));
249 :
250 0 : if (!m_pFormatLB->GetSelectEntryCount())
251 0 : m_pFormatLB->SelectEntryPos(0);
252 : }
253 :
254 0 : bool bValue = false, bName = false, bMacro = false, bInsert = true;
255 0 : bool bFormat = nSize != 0;
256 :
257 : // two controls for conditional text
258 0 : bool bDropDown = TYP_DROPDOWN == nTypeId;
259 0 : bool bCondTextField = TYP_CONDTXTFLD == nTypeId;
260 :
261 0 : m_pCond1FT->Show(!bDropDown && bCondTextField);
262 0 : m_pCond1ED->Show(!bDropDown && bCondTextField);
263 0 : m_pCond2FT->Show(!bDropDown && bCondTextField);
264 0 : m_pCond2ED->Show(!bDropDown && bCondTextField);
265 0 : m_pValueGroup->Show(!bDropDown && !bCondTextField);
266 0 : m_pMacroBT->Show(!bDropDown);
267 0 : m_pNameED->Show(!bDropDown);
268 0 : m_pNameFT->Show(!bDropDown);
269 :
270 0 : m_pListGroup->Show(bDropDown);
271 :
272 0 : m_pNameED->SetDropEnable(false);
273 :
274 0 : if (IsFieldEdit())
275 : {
276 0 : if(bDropDown)
277 : {
278 0 : const SwDropDownField* pDrop = static_cast<const SwDropDownField*>(GetCurField());
279 0 : uno::Sequence<OUString> aItems = pDrop->GetItemSequence();
280 0 : const OUString* pArray = aItems.getConstArray();
281 0 : m_pListItemsLB->Clear();
282 0 : for(sal_Int32 i = 0; i < aItems.getLength(); i++)
283 0 : m_pListItemsLB->InsertEntry(pArray[i]);
284 0 : m_pListItemsLB->SelectEntry(pDrop->GetSelectedItem());
285 0 : m_pListNameED->SetText(pDrop->GetPar2());
286 0 : m_pListNameED->SaveValue();
287 0 : bDropDownLBChanged = false;
288 : }
289 : else
290 : {
291 0 : m_pNameED->SetText(GetCurField()->GetPar1());
292 0 : m_pValueED->SetText(GetCurField()->GetPar2());
293 : }
294 : }
295 : else
296 : {
297 0 : m_pNameED->SetText(OUString());
298 0 : m_pValueED->SetText(OUString());
299 : }
300 0 : if(bDropDown)
301 0 : ListEnableHdl(0);
302 :
303 0 : if (m_pNameFT->GetText() != m_sOldNameFT)
304 0 : m_pNameFT->SetText(m_sOldNameFT);
305 0 : if (m_pValueFT->GetText() != m_sOldValueFT)
306 0 : m_pValueFT->SetText(m_sOldValueFT);
307 :
308 0 : switch (nTypeId)
309 : {
310 : case TYP_MACROFLD:
311 0 : bMacro = true;
312 0 : if (!GetFieldMgr().GetMacroPath().isEmpty())
313 0 : bValue = true;
314 : else
315 0 : bInsert = false;
316 :
317 0 : m_pNameFT->SetText(SW_RESSTR(STR_MACNAME));
318 0 : m_pValueFT->SetText(SW_RESSTR(STR_PROMPT));
319 0 : m_pNameED->SetText(GetFieldMgr().GetMacroName());
320 0 : m_pNameED->SetAccessibleName(m_pNameFT->GetText());
321 0 : m_pValueED->SetAccessibleName(m_pValueFT->GetText());
322 0 : break;
323 :
324 : case TYP_HIDDENPARAFLD:
325 0 : m_pNameFT->SetText(SW_RESSTR(STR_COND));
326 0 : m_pNameED->SetDropEnable(true);
327 0 : bName = true;
328 0 : m_pNameED->SetAccessibleName(m_pNameFT->GetText());
329 0 : m_pValueED->SetAccessibleName(m_pValueFT->GetText());
330 0 : break;
331 :
332 : case TYP_HIDDENTXTFLD:
333 : {
334 0 : m_pNameFT->SetText(SW_RESSTR(STR_COND));
335 0 : m_pNameED->SetDropEnable(true);
336 0 : m_pValueFT->SetText(SW_RESSTR(STR_INSTEXT));
337 0 : SwWrtShell* pSh = GetActiveWrtShell();
338 0 : if (!IsFieldEdit() && pSh )
339 0 : m_pValueED->SetText(pSh->GetSelText());
340 0 : bName = bValue = true;
341 0 : m_pNameED->SetAccessibleName(m_pNameFT->GetText());
342 0 : m_pValueED->SetAccessibleName(m_pValueFT->GetText());
343 : }
344 0 : break;
345 :
346 : case TYP_CONDTXTFLD:
347 0 : m_pNameFT->SetText(SW_RESSTR(STR_COND));
348 0 : m_pNameED->SetDropEnable(true);
349 0 : if (IsFieldEdit())
350 : {
351 0 : m_pCond1ED->SetText(GetCurField()->GetPar2().getToken(0, '|'));
352 0 : m_pCond2ED->SetText(GetCurField()->GetPar2().getToken(1, '|'));
353 : }
354 :
355 0 : bName = bValue = true;
356 0 : m_pNameED->SetAccessibleName(m_pNameFT->GetText());
357 0 : m_pValueED->SetAccessibleName(m_pValueFT->GetText());
358 0 : break;
359 :
360 : case TYP_JUMPEDITFLD:
361 0 : m_pNameFT->SetText(SW_RESSTR(STR_JUMPEDITFLD));
362 0 : m_pValueFT->SetText(SW_RESSTR(STR_PROMPT));
363 0 : bName = bValue = true;
364 0 : m_pNameED->SetAccessibleName(m_pNameFT->GetText());
365 0 : m_pValueED->SetAccessibleName(m_pValueFT->GetText());
366 0 : break;
367 :
368 : case TYP_INPUTFLD:
369 0 : m_pValueFT->SetText(SW_RESSTR(STR_PROMPT));
370 0 : bValue = true;
371 0 : m_pNameED->SetAccessibleName(m_pNameFT->GetText());
372 0 : m_pValueED->SetAccessibleName(m_pValueFT->GetText());
373 0 : break;
374 :
375 : case TYP_COMBINED_CHARS:
376 : {
377 0 : m_pNameFT->SetText(SW_RESSTR(STR_COMBCHRS_FT));
378 0 : m_pNameED->SetDropEnable(true);
379 0 : bName = true;
380 :
381 0 : const sal_Int32 nLen = m_pNameED->GetText().getLength();
382 0 : if( !nLen || nLen > MAX_COMBINED_CHARACTERS )
383 0 : bInsert = false;
384 0 : m_pNameED->SetAccessibleName(m_pNameFT->GetText());
385 0 : m_pValueED->SetAccessibleName(m_pValueFT->GetText());
386 : }
387 0 : break;
388 : case TYP_DROPDOWN :
389 0 : break;
390 : default:
391 0 : break;
392 : }
393 :
394 0 : m_pSelectionLB->Hide();
395 :
396 0 : m_pFormat->Enable(bFormat);
397 0 : m_pNameFT->Enable(bName);
398 0 : m_pNameED->Enable(bName);
399 0 : m_pValueGroup->Enable(bValue);
400 0 : m_pMacroBT->Enable(bMacro);
401 :
402 0 : EnableInsert( bInsert );
403 : }
404 :
405 0 : return 0;
406 : }
407 :
408 0 : IMPL_LINK_NOARG(SwFieldFuncPage, SelectHdl)
409 : {
410 0 : const sal_uInt16 nTypeId = (sal_uInt16)reinterpret_cast<sal_uLong>(m_pTypeLB->GetEntryData(GetTypeSel()));
411 :
412 0 : if( TYP_MACROFLD == nTypeId )
413 0 : m_pNameED->SetText( m_pSelectionLB->GetSelectEntry() );
414 :
415 0 : return 0;
416 : }
417 :
418 0 : IMPL_LINK_NOARG(SwFieldFuncPage, InsertMacroHdl)
419 : {
420 0 : SelectHdl();
421 0 : InsertHdl();
422 :
423 0 : return 0;
424 : }
425 :
426 0 : IMPL_LINK( SwFieldFuncPage, ListModifyHdl, Control*, pControl)
427 : {
428 0 : m_pListItemsLB->SetUpdateMode(false);
429 0 : if(pControl == m_pListAddPB ||
430 0 : (pControl == m_pListItemED && m_pListAddPB->IsEnabled()))
431 : {
432 0 : const OUString sEntry(m_pListItemED->GetText());
433 0 : m_pListItemsLB->InsertEntry(sEntry);
434 0 : m_pListItemsLB->SelectEntry(sEntry);
435 : }
436 0 : else if(m_pListItemsLB->GetSelectEntryCount())
437 : {
438 0 : sal_Int32 nSelPos = m_pListItemsLB->GetSelectEntryPos();
439 0 : if(pControl == m_pListRemovePB)
440 : {
441 0 : m_pListItemsLB->RemoveEntry(nSelPos);
442 0 : m_pListItemsLB->SelectEntryPos(nSelPos ? nSelPos - 1 : 0);
443 : }
444 0 : else if(pControl == m_pListUpPB)
445 : {
446 0 : if(nSelPos)
447 : {
448 0 : const OUString sEntry = m_pListItemsLB->GetSelectEntry();
449 0 : m_pListItemsLB->RemoveEntry(nSelPos);
450 0 : nSelPos--;
451 0 : m_pListItemsLB->InsertEntry(sEntry, nSelPos);
452 0 : m_pListItemsLB->SelectEntryPos(nSelPos);
453 : }
454 : }
455 0 : else if(pControl == m_pListDownPB)
456 : {
457 0 : if(nSelPos < m_pListItemsLB->GetEntryCount() - 1)
458 : {
459 0 : const OUString sEntry = m_pListItemsLB->GetSelectEntry();
460 0 : m_pListItemsLB->RemoveEntry(nSelPos);
461 0 : nSelPos++;
462 0 : m_pListItemsLB->InsertEntry(sEntry, nSelPos);
463 0 : m_pListItemsLB->SelectEntryPos(nSelPos);
464 : }
465 : }
466 : }
467 0 : bDropDownLBChanged = true;
468 0 : m_pListItemsLB->SetUpdateMode(true);
469 0 : ListEnableHdl(0);
470 0 : return 0;
471 : }
472 :
473 0 : IMPL_LINK_NOARG(SwFieldFuncPage, ListEnableHdl)
474 : {
475 : //enable "Add" button when text is in the Edit that's not already member of the box
476 0 : m_pListAddPB->Enable(!m_pListItemED->GetText().isEmpty() &&
477 0 : LISTBOX_ENTRY_NOTFOUND == m_pListItemsLB->GetEntryPos(m_pListItemED->GetText()));
478 0 : bool bEnableButtons = m_pListItemsLB->GetSelectEntryCount() > 0;
479 0 : m_pListRemovePB->Enable(bEnableButtons);
480 0 : m_pListUpPB->Enable(bEnableButtons && (m_pListItemsLB->GetSelectEntryPos() > 0));
481 0 : m_pListDownPB->Enable(bEnableButtons &&
482 0 : (m_pListItemsLB->GetSelectEntryPos() < (m_pListItemsLB->GetEntryCount() - 1)));
483 :
484 0 : return 0;
485 : }
486 :
487 : // renew types in SelectionBox
488 0 : void SwFieldFuncPage::UpdateSubType()
489 : {
490 0 : const sal_uInt16 nTypeId = (sal_uInt16)reinterpret_cast<sal_uLong>(m_pTypeLB->GetEntryData(GetTypeSel()));
491 :
492 : // fill Selection-Listbox
493 0 : m_pSelectionLB->SetUpdateMode(false);
494 0 : m_pSelectionLB->Clear();
495 :
496 0 : std::vector<OUString> aLst;
497 0 : GetFieldMgr().GetSubTypes(nTypeId, aLst);
498 0 : const size_t nCount = aLst.size();
499 :
500 0 : for(size_t i = 0; i < nCount; ++i)
501 : {
502 0 : size_t nPos = m_pSelectionLB->InsertEntry(aLst[i]);
503 0 : m_pSelectionLB->SetEntryData(nPos, reinterpret_cast<void*>(i));
504 : }
505 :
506 0 : bool bEnable = nCount != 0;
507 :
508 0 : m_pSelectionLB->Enable( bEnable );
509 :
510 0 : if (bEnable)
511 : {
512 0 : m_pSelectionLB->SelectEntryPos(0);
513 : }
514 :
515 0 : if (nTypeId == TYP_MACROFLD)
516 : {
517 0 : const bool bHasMacro = !GetFieldMgr().GetMacroPath().isEmpty();
518 :
519 0 : if (bHasMacro)
520 : {
521 0 : m_pNameED->SetText(GetFieldMgr().GetMacroName());
522 0 : m_pValueGroup->Enable();
523 : }
524 0 : EnableInsert(bHasMacro);
525 : }
526 :
527 0 : m_pSelectionLB->SetUpdateMode(true);
528 0 : }
529 :
530 : // call MacroBrowser, fill Listbox with Macros
531 0 : IMPL_LINK( SwFieldFuncPage, MacroHdl, Button *, pBtn )
532 : {
533 0 : vcl::Window* pDefModalDlgParent = Application::GetDefDialogParent();
534 0 : Application::SetDefDialogParent( pBtn );
535 0 : const OUString sMacro(TurnMacroString(m_pNameED->GetText()).replaceAll(".", ";"));
536 0 : if (GetFieldMgr().ChooseMacro(sMacro))
537 0 : UpdateSubType();
538 :
539 0 : Application::SetDefDialogParent( pDefModalDlgParent );
540 :
541 0 : return 0;
542 : }
543 :
544 0 : bool SwFieldFuncPage::FillItemSet(SfxItemSet* )
545 : {
546 0 : const sal_uInt16 nTypeId = (sal_uInt16)reinterpret_cast<sal_uLong>(m_pTypeLB->GetEntryData(GetTypeSel()));
547 :
548 0 : sal_uInt16 nSubType = 0;
549 :
550 0 : const sal_Int32 nEntryPos = m_pFormatLB->GetSelectEntryPos();
551 : const sal_uLong nFormat = (nEntryPos == LISTBOX_ENTRY_NOTFOUND)
552 0 : ? 0 : reinterpret_cast<sal_uLong>(m_pFormatLB->GetEntryData(nEntryPos));
553 :
554 0 : OUString aVal(m_pValueED->GetText());
555 0 : OUString aName(m_pNameED->GetText());
556 :
557 0 : switch(nTypeId)
558 : {
559 : case TYP_INPUTFLD:
560 0 : nSubType = INP_TXT;
561 : // to prevent removal of CR/LF restore old content
562 0 : if(!m_pNameED->IsModified() && IsFieldEdit())
563 0 : aName = GetCurField()->GetPar1();
564 :
565 0 : break;
566 :
567 : case TYP_MACROFLD:
568 : // use the full script URL, not the name in the Edit control
569 0 : aName = GetFieldMgr().GetMacroPath();
570 0 : break;
571 :
572 : case TYP_CONDTXTFLD:
573 0 : aVal = m_pCond1ED->GetText() + "|" + m_pCond2ED->GetText();
574 0 : break;
575 : case TYP_DROPDOWN :
576 : {
577 0 : aName = m_pListNameED->GetText();
578 0 : for(sal_Int32 i = 0; i < m_pListItemsLB->GetEntryCount(); i++)
579 : {
580 0 : if(i)
581 0 : aVal += OUString(DB_DELIM);
582 0 : aVal += m_pListItemsLB->GetEntry(i);
583 : }
584 : }
585 0 : break;
586 : default:
587 0 : break;
588 : }
589 :
590 0 : if (!IsFieldEdit() ||
591 0 : m_pNameED->IsValueChangedFromSaved() ||
592 0 : m_pValueED->IsValueChangedFromSaved() ||
593 0 : m_pCond1ED->IsValueChangedFromSaved() ||
594 0 : m_pCond2ED->IsValueChangedFromSaved() ||
595 0 : m_pListNameED->IsValueChangedFromSaved() ||
596 0 : bDropDownLBChanged ||
597 0 : nOldFormat != nFormat)
598 : {
599 0 : InsertField( nTypeId, nSubType, aName, aVal, nFormat );
600 : }
601 :
602 0 : ModifyHdl(); // enable/disable Insert if applicable
603 :
604 0 : return false;
605 : }
606 :
607 0 : OUString SwFieldFuncPage::TurnMacroString(const OUString &rMacro)
608 : {
609 0 : if (!rMacro.isEmpty())
610 : {
611 : // reverse content of aName
612 0 : OUString sMacro;
613 0 : sal_Int32 nPos = 0;
614 :
615 0 : for (int i = 0; i < 4 && nPos != -1; i++)
616 : {
617 : OUString sTmp = (i == 3)
618 : ? rMacro.copy(nPos)
619 0 : : rMacro.getToken(0, '.', nPos);
620 :
621 0 : sMacro = !sMacro.isEmpty()
622 0 : ? sTmp + "." + sMacro
623 0 : : sTmp;
624 0 : }
625 0 : return sMacro;
626 : }
627 :
628 0 : return rMacro;
629 : }
630 :
631 0 : VclPtr<SfxTabPage> SwFieldFuncPage::Create( vcl::Window* pParent,
632 : const SfxItemSet* rAttrSet )
633 : {
634 0 : return VclPtr<SwFieldFuncPage>::Create( pParent, *rAttrSet );
635 : }
636 :
637 0 : sal_uInt16 SwFieldFuncPage::GetGroup()
638 : {
639 0 : return GRP_FKT;
640 : }
641 :
642 0 : void SwFieldFuncPage::FillUserData()
643 : {
644 0 : const sal_Int32 nEntryPos = m_pTypeLB->GetSelectEntryPos();
645 : const sal_uInt16 nTypeSel = ( LISTBOX_ENTRY_NOTFOUND == nEntryPos )
646 : ? USHRT_MAX
647 : : sal::static_int_cast< sal_uInt16 >
648 0 : (reinterpret_cast< sal_uIntPtr >(m_pTypeLB->GetEntryData( nEntryPos )));
649 0 : SetUserData(USER_DATA_VERSION ";" + OUString::number( nTypeSel ));
650 0 : }
651 :
652 0 : IMPL_LINK_NOARG(SwFieldFuncPage, ModifyHdl)
653 : {
654 0 : const sal_Int32 nLen = m_pNameED->GetText().getLength();
655 :
656 0 : bool bEnable = true;
657 0 : sal_uInt16 nTypeId = (sal_uInt16)reinterpret_cast<sal_uLong>(m_pTypeLB->GetEntryData(GetTypeSel()));
658 :
659 0 : if( TYP_COMBINED_CHARS == nTypeId &&
660 0 : (!nLen || nLen > MAX_COMBINED_CHARACTERS ))
661 0 : bEnable = false;
662 :
663 0 : EnableInsert( bEnable );
664 :
665 0 : return 0;
666 0 : }
667 :
668 : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|
