summaryrefslogtreecommitdiffstats
path: root/buildtools/pascal/pascalprojectoptionsdlg.h
blob: 78698a45d7c53867f4cd56060be6ce24ff357e7f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
/***************************************************************************
 *   Copyright (C) 2003 Alexander Dymo                                     *
 *   cloudtemple@mksat.net                                                 *
 *                                                                         *
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 ***************************************************************************/
#ifndef PASCALPROJECTOPTIONSDLG_H
#define PASCALPROJECTOPTIONSDLG_H

#include <ktrader.h>

#include "pascalproject_optionsdlgbase.h"

class PascalProjectPart;
class KDevCompilerOptions;

class PascalProjectOptionsDlg : public PascalProjectOptionsDlgBase
{
  TQ_OBJECT
  

public:
    PascalProjectOptionsDlg(PascalProjectPart *part, TQWidget* parent = 0, const char* name = 0, WFlags fl = 0 );
    ~PascalProjectOptionsDlg();

public slots:
    virtual void accept();

protected slots:
    virtual void compiler_box_activated(const TQString &s);
    void configComboTextChanged(const TQString &config);
    void configChanged(const TQString &config);
    void configAdded();
    void configRemoved();
    void optionsButtonClicked();
    void setDirty();
    void setDefaultOptions();

private:
    TQStringList allConfigs;
    TQString currentConfig;
    bool dirty;

    TDETrader::OfferList offers;
    TQStringList service_names;
    TQStringList service_execs;

    PascalProjectPart *m_part;

    void saveConfig(TQString config);
    void readConfig(TQString config);
    TQStringList allBuildConfigs();
};

#endif