Autor Thema: Mit Smarticons Text einfügen  (Gelesen 1203 mal)

Offline NotesUser3

  • Frischling
  • *
  • Beiträge: 32
  • Geschlecht: Männlich
Mit Smarticons Text einfügen
« am: 21.11.02 - 11:41:50 »
Ich habe folgendes Problem, wir haben diverse Mitarbeiter, die Sonderzeichen in ihrem Namen haben. Ich möchte jetzt am liebsten ein Smarticon erstellen, dass z.B. den ganzen Namen einfügt. Eigentlich genauso wie der Autotext bei Word. Ein Click und er Namen wird an der Cursorposition eingefügt. Leider konnte ich bisher nicht dazu finden.

MfG

Resch

Offline Miguel

  • Frischling
  • *
  • Beiträge: 34
  • Geschlecht: Männlich
Re:Mit Smarticons Text einfügen
« Antwort #1 am: 21.11.02 - 15:17:30 »
Hallo,
das hab ich mal irgendwo gefunden:

das sollte das sein, was Du suchst.
Die komplette Formel:

TempName:=@NewLine+"Miguel";
TempCompany:=@NewLine+"ACME AG";
TempTitle:=@NewLine+"Tel.: 9999"+@NewLine;

@Command([TextSetFontFace];"Sans Serif");
@Command([TextSetFontSize];"16");
@Command([TextUnderline]);
@Command([TextSetFontColor];);
@Command([EditInsertText];Tempname);

@Command([TextSetFontFace];"Helv");
@Command([TextSetFontColor];);
@Command([TextSetFontSize];"10");
@Command([TextNormal]);
@Command([TextNormal]);
@Command([TextBold]);
@Command([EditInsertText];TempCompany);

@Command([TextSetFontFace];"Helv");
@Command([TextSetFontColor];);
@Command([TextSetFontSize];"10");
@Command([EditInsertText];TempTitle);

@Command([TextNormal]);
@Command([EditInsertText];TempPhone);
@Command([EditInsertText];TempOther);


Gruss
        Miguel
Ignoramus et ignorabimus.

Offline NotesUser3

  • Frischling
  • *
  • Beiträge: 32
  • Geschlecht: Männlich
Re:Mit Smarticons Text einfügen
« Antwort #2 am: 21.11.02 - 15:30:14 »
Danke Miguel, allerdings ist der entscheidene Befehl
@command([EditinsertText]; "Text der eingefügt werden soll")

Aber Danke nochmal, hat mir sehr geholfen.

Gruß

Resch

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz