kabc/vcard/testwrite.cpp


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

#include <kaboutdata.h>
#include <kapplication.h>
#include <kdebug.h>
#include <klocale.h>
#include <kcmdlineargs.h>

#include <VCard.h>

int main(int argc,char **argv)
{
  TDEAboutData aboutData("testwrite",I18N_NOOP("TestWritevCard"),"0.1");
  TDECmdLineArgs::init(argc,argv,&aboutData);

  TDEApplication app;
  
  kdDebug() << "Test Write VCard" << endl;

  using namespace VCARD;
  
  VCard v;

  ContentLine cl1;
  cl1.setName(EntityTypeToParamName(EntityName));
  cl1.setValue(new TextValue("Hans Wurst"));
  v.add(cl1);

  ContentLine cl2;
  cl2.setName(EntityTypeToParamName(EntityTelephone));
  cl2.setValue(new TelValue("12345"));
  ParamList p;
  p.append( new TelParam("home") );
  p.append( new TelParam("fax") );
  cl2.setParamList( p );
  v.add(cl2);

  TQCString str = v.asString();

  kdDebug() << "--- VCard begin ---" << endl
            << str
            << "--- VCard  end  ---" << endl;
}