ALWIM
Anmeldungsdatum: 08.08.2006 Beiträge: 1040 Wohnort: Niederbayern
|
Verfasst am: 21.12.2017, 02:57 Titel: |
|
|
grindstone hat Folgendes geschrieben: | ALWIM hat Folgendes geschrieben: | Es lässt sich halt nur schwer in meinem Programm mit einbauen. | Wieso? Ganz vorne im Programm Code: | #Include Once "utf_conv.bi" | dann Code: | Function UTF(s As String) As String
Dim As String sUTF
Dim As Integer numberOfBytes
sUTF = String(Len(s) * 2, " ")
CharToUTF(UTF_ENCOD_UTF8, StrPtr(s), Len(s), StrPtr(sUTF), @numberOfBytes)
Return Left(sUTF, numberOfBytes)
End Function | in den Quellcode kopieren und statt beispielsweise dann jeweils Code: | Print #ff, UTF(text) |
Was ist daran schwer einzubauen?
Was das Suchen von Alternativen betrifft, muß ich dir allerdings zustimmen. Es ist immer gut, im Zweifel noch einen Plan B zu haben.
Gruß
grindstone | Ich habe das Programm etwas umständlich bzw. kompliziert programmiert! Ich müsste es an gewissen Stellen komplett umschreiben, um die Funktion verwenden zu können. Und das ist mir der Aufwand nicht wert!
Ich kann zum Beispiel den Namen "UTF" als Funktion schon mal nicht verwenden, da dieser bereits anderweitig in gebrauch ist. Müsste also erst mal den Namen der Funktion ändern. Wäre kein Problem und schnell erledigt.
Außerdem macht es ja keinen Sinn, die Funktion zu verwenden, wenn ich nur reine ASCII-Zeichen verwende. Das Thema hat sich demnach für mich erledigt.
Ich danke allen für die Tipps und Ratschläge!
Gruß
ALWIM _________________ SHELL SHUTDOWN -s -t 05 |
|