Font.name mitliefern?

[Natcree]

Ist esmöglich eine Schriftart mitzuliefern da andere systeme ja eingige Schriftarten nicht besitzen?

[hoika]

Hallo,

wenn sie frei sind, ja,
wenn nicht, dann natürlich nicht.

Die TTF muss dann ins Font-Verzeichnis kopiert werden.


Heiko

[himitsu]

Zitat von hoika:

wenn sie frei sind, ja,

Schriftarten, untliegen auch gewissen Lizenzrechten, so wie Bilder oder ganze Programme.

Zitat von hoika:

Die TTF muss dann ins Font-Verzeichnis kopiert werden.

Nur wenn sie global für alle Programme instaliert werden soll.

Es wäre aber auch möglich Schriftarten temporär zu registrieren, während der Programmlaufzeit.

[Popov]

@Natcree

Ist die Frage rechtlich oder technisch gemeint?

Wenn technisch, und du die Schrift nur für dein Programm nutzen willst. Hier zwei Funktionen aus einem meiner Programme. Die Parameter-Beschreibung ist nur grob:

Delphi-Quellcode:

function AddFont(FileName: String): Boolean;
begin
  //AddFontResourceEx entspricht etwa AddFontResource, hat aber einige Extras
  //Param A: Name/Pfad einer gültigen Schriftdatei (nullterminierter String)
  //Param B: FR_PRIVATE, FR_NOT_ENUM.
  //- FR_PRIVATE: nur der eigene Prozess kann die Schrift nutzen.
  //- FR_NOT_ENUM: Schrift wird nicht der Schriftliste hinzugefügt.
  //Param C: Reserviert, muss 0 sein.
  Result := AddFontResourceEx(PChar(FileName), FR_PRIVATE, 0) > 0;
end;

function RemoveFont(FileName: String): Boolean;
begin
  //Param B: muss gleich sein wie bei AddFontResourceEx beim Hinzugefügen.
  //Param C: Reserviert, muss 0 sein.
  Result := RemoveFontResourceEx(PChar(FileName), FR_PRIVATE, 0)
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  AddFont(ExtractFilePath(ParamStr(0)) + 'test.ttf');
  Label1.Font.Name := 'test';
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
   RemoveFont(ExtractFilePath(ParamStr(0)) + 'test.ttf');
end;

[Natcree]

technisch natürlich




also dann wird mit der Button1click routin der font.name von label1 gezogen und als ttf
datei gespeichert richtig ?????

und bei button2.... ??????????

[Popov]

Nein. Die erste Zeile in Button1Click läd die Schrift Test.ttf, die sich im gleichen Ordner befindet wie das Programm (bei dem Parameter nur für dein Programm). Nach der Zeile ist die Schrift "Test" für dein Programm verfügbar. In der zweiten Zeile wird nur Label1 eine Schrift zugewiesen. Vorher geht das nicht, da vorher die Schrift noch nicht angemeldet ist.

In Button2 wird die Schrift wieder entladen. Das kann man explizit machen, man kann es auch sein lassen. In dem Fall wird das beim beenden des Programms gemacht.

[Natcree]

und wo finde ich dann die datei für die Schriftart ???

[Luckie]

Hat er doch geschrieben. Die Datei muss bei seinem Beispiel im Ordner des Programmes liegen.

[Natcree]

nee ich meint wenn ich z.b. die schriftart clarence die es auf winxp nicht gibt übertragen will dann muss ich ja die Datei dieser schriftart ja irgendwo herholen..

[himitsu]

Zitat von Natcree:

nee ich meint wenn ich z.b. die schriftart clarence die es auf winxp nicht gibt übertragen will dann muss ich ja die Datei dieser schriftart ja irgendwo herholen..

Ja, das mußt du, wobei man sich das doch eigentlich denken sollte?

Entweder von da, wo sie jetzt liegt (aus'm Font-Ordner des Windows), oder aus einer der vielen Quellen im Internet runterladen. (es gibt massig Webseiten, welche Schriftarten anbieten)

ABER, und das wurde auch schon gesagt, du darfst es nur kopieren und mitgeben, wenn du auch das Recht dazu hast. (Stichwort: Lizenzen)
Es gibt mehrere Fonts mit dem Namen "Clarence" ... einige kostenlos, bzw. aus unbekannter Herkunft und mit unbekannter Lizenz und Andere kosten schon einige Euros.
Aber da keiner weiß wie dein Font aussieht, bzw. Welcher es nun ist, kann keiner Genaueres sagen.

Bei den installierten Fonts muß man erstmal rausfinden wer den Font installiert hat und dann müsste man bei dem Progamm in die Lizenzbedingungen schauen,
was auch wieder oftmals nur hilft, wenn der Font auch zu der Software gehörte und die nicht selber nur ein eingeschränktes Recht besitzen.