|
| Autor |
Nachricht |
gs_1c3m4n_
Tutorial Leser
Anmeldedatum: 12.02.2007
Beiträge: 53
Wohnort: Langenhagen
|
schriftarten einstelln
Verfasst am: 21.04.2007, 21:31 |
|
|
hallo
ich ma wieda
wollt ne stopuhr programmiern.
ist soweit fertig.
nur muss da noch die schriftart einer digitaluhr rein.
aber auch so das es auf nem andern rechner der diese
schriftart nich hat funzt.
wie?
mit freundlichen grüßen
gs_1c3m4n |
|
| |
|
 |
413X_
« Moderator »
Anmeldedatum: 16.12.2006
Beiträge: 266
|
Verfasst am: 21.04.2007, 21:55 |
|
|
Du kannst die Schriftart mitliefern und in das Windows\Fonts verzeichnis kopieren, dann kann es auch genutzt werden
http://www.413x.dl.am
Tod den 1337-Scriptkiddies xD |
|
| |
|
|
treY.de_
Poster
Anmeldedatum: 20.03.2007
Beiträge: 110
Wohnort: localhost
|
Verfasst am: 21.04.2007, 22:24 |
|
|
Also ich würde es so machen:
Am anfang ne If abfrage ob die Datei vorhanden ist FSO...
Und wenn nicht aus der Res entpacken und ins Font verzeichnis..siehe Builder
treY.de |
|
| |
|
|
413X_
« Moderator »
Anmeldedatum: 16.12.2006
Beiträge: 266
|
Verfasst am: 21.04.2007, 22:35 |
|
|
Deins ist die elegantere Loesung, dann hier noch zum Abschluss die einfachste:
die Fontdatei neben der .exe mitliefern,
und mit der On Error Resume Next funktion die fontdatei ins font verzeichnis kopieren.
(FileCopy App.Path & "\" & "Digital.ttf", "C:\Windows\Font\Digital.ttf") so ungefaehr 
das on error resume next faengt den error ab, falls die datei schon vorhanden ist 
http://www.413x.dl.am
Tod den 1337-Scriptkiddies xD |
|
| |
|
|
gs_1c3m4n_
Tutorial Leser
Anmeldedatum: 12.02.2007
Beiträge: 53
Wohnort: Langenhagen
|
Verfasst am: 22.04.2007, 11:05 |
|
|
ok. wie das gemint is hab ich gechekct. aba von der funktion hab ich kein plan^^
werd mich aba schlau machen. es seiden ihr könnt mia das kurz beschreiben.
also nen code der das macht wär cool  |
|
| |
|
|
treY.de_
Poster
Anmeldedatum: 20.03.2007
Beiträge: 110
Wohnort: localhost
|
Verfasst am: 22.04.2007, 11:24 |
|
|
Meins oder von 413x ?
Natürlich musst du hier jetzt noch alle anpassen..sprich verzeichnis und so...
Zig:
| Zitat: | Als erstes braucht ihr dazu den Ressourcen Editor.
Den bekommt ihr, wenn ihr oben auf Add-Ins => Add-In-Manager drückt und dann den Eintrag VB 6 Ressourcen-Editor sucht und markiert.
Unten hakt ihr dann diese zwei Optionen an: Beim Start laden und Laden/Entladen.
Nachdem ihr OK gedrückt habt, müsstet ihr jetzt oben ein neues Zeichen dazubekommen haben. So eins:
Falls ihr es nicht findet, dann drückt einfach auf Extras => Ressourcen-Editor.
Jetzt habt ihr also ein neues Fenster, den Ressourcen-Editor offen.
Nun sucht ihr das Icon für Benutzerdefinierte Ressourcen, das ganz rechts vor dem Fragezeichen ist und drückt drauf.
Fügt nun eure Exe Datei ein.
Diese Datei sollte jetzt mit der Nummer 101 eingefügt sein, da es die erste ist, die ihr eingefügt habt.
Jetzt ist es wichtig, das ihr im Ressourcen-Editor auf speichern drückt.
Dann könnt ihr ihn schließen.
So. Und hier nun ein Beispiel zum entpacken der Ressource.
4. Ressource entpacken
| Code: | Dim buffer() As Byte
buffer = LoadResData(101, "CUSTOM")
Open fout For Binary As #1
Put #1, , buffer()
Close #1 |
Ich erklär euch den code Zeile für Zeile.
| Code: | | Dim buffer() As Byte |
Wir deklarieren also erstmal die Variable buffer as Byte, in der wir dann die Ressource speichern um sie dann auf der Festplatte erstellen zu können.
| Code: | | buffer = LoadResData(101, "CUSTOM") |
In der zweiten Zeile laden wir die Ressource Nummer 101 in buffer.
„CUSTOM“ gibt an welche Art von Ressource das ist, und es ist ja eine Benutzerdefinierte.
| Code: | | Open (App.Path & „\server.exe“) For Binary As #1 |
Hier öffnen wir nun die Datei, außer sie existiert noch nicht, dann wird sie erstellt.
Das ganze passiert im Binär Modus und ich habe hier die Nummer #1 gewählt für diese Datei.
Wenn ihr euch damit nicht auskennt, dann solltet ihr euch zuerst über dieses Thema informieren, bevor ihr weiterlest.
Was bedeutet (App.Path & „\server.exe“) ???
Ganz einfach. App.Path übergibt den Pfad wo der Builder gespeichert ist und wir fügen dann einfach noch \server.exe dran und haben so schon den kompletten Pfad zu der Datei.
Mit dieser Zeile fügen wir in die Datei mit der Nummer #1, die Ressource Datei ein, die wir in buffer gespeichert haben ein.
Hiermit wird der Zugriff auf die Datei wieder beendet/geschlossen.
Das ist sehr wichtig, dass man Dateien die man nicht mehr benutzt auch wieder freigibt.
Hier wird jetzt nur die Datei #1 geschlossen, aber wenn ihr mehrere auf einmal schließen wollt, braucht ihr nur close schreiben. |
|
|
| |
|
|
|
|
Registrieren
Login
