Delphi Wenn . dann Fenster öffnen wie bei Delphi - Seite 3

Thema durchsuchen

Ansicht

Themen-Optionen

Wenn . dann Fenster öffnen wie bei Delphi

Ein Thema von Christian18 · begonnen am 1. Okt 2004 · letzter Beitrag vom 1. Okt 2004

Antwort

Seite 3 von 3

Aenogym

Registriert seit: 7. Mär 2004
Ort: Schwerin
1.089 Beiträge

Delphi 7 Enterprise

#21

Re: Wenn . dann Fenster öffnen wie bei Delphi

1. Okt 2004, 16:09

die funktion Canvas.TextHeight bzw. Canvas.TextWidth gibt dir die höhe und breite des angegebenen buchstabens in Pixeln zurück. ich habe W genommen. du könntest auch irgendein anderes zeichen nehmen, da bei Courier New alle buchstaben gleich groß sind.

achtung: wenn du eine schrift mit variabler größe (zB Arial) nimmst, funktioniert der Code leider nicht mehr!

Aenogym

Steffen Rieke
Was nicht buzzt, wird buzzend gemacht!
http://blog.base-records.de
http://www.base-records.de