Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.071 Beiträge
 
Delphi 12 Athens
 
#4

Re: Label verschieden formatieren

  Alt 3. Nov 2003, 10:54
Dann vielleicht doch mit 2 Labels:

Je 2 Labels nebeneinander auf die gleiche Höhe (Top) und mit den entsprechenden Formatierungen.
http://www.FrankNStein.de/DBL.jpeg

Delphi-Quellcode:
{DBText1 = Vorname}
{DBText2 = Nachname}
{DBText3 = Strasse}
{DBText4 = Hausnummer}

{ Voreinstellungen an den Labels (auch schon im IO) }
DBText1.AutoSize := True; DBText1.Font.Style := [];
DBText2.AutoSize := True; DBText2.Font.Style := [fsBold];
DBText3.AutoSize := True; DBText3.Font.Style := [];
DBText4.AutoSize := True; DBText4.Font.Style := [];


{ z.B. Nachdem den Labels ein neuer Wert zugewiesen wurde }
DBText2.Left := DBText1.Left + DBText1.Width + 3{z.B. Breite eines Leerzeichens};
DBText4.Left := DBText3.Left + DBText3.Width + 3{z.B. Breite eines Leerzeichens};

{ wenn du die genaue Breite des Leerzeichens haben möchstest }
DBText2.Left := DBText1.Left + DBText1.Width + TextLaenge(DBText1.Font, ' ');
DBText4.Left := DBText3.Left + DBText3.Width + TextLaenge(DBText3.Font, ' ');
TextLaenge ist in Neuen Beitrag zur Code-Library hinzufügen / Länge und Höhe eines Textes...
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
  Mit Zitat antworten Zitat