Ergebnis der Suchanfrage

• Forum: FreePascal

  AW: Text zur Anzeige kürzen mit Punkten hinten

   
    by Guido Eisenbeis, 4. Nov 2011
  Hier nun meine Variante. :-D
  // Routine zum Kürzen eines Textes und Anhängen von Punkten an den Text.
  function SetShortenedTextWithDots(AFont: TFont; AText: String;
  AMaxWidth: Integer): string;
  const
  Dots = ' ...';
  var
  ShortTxt: String;
  Cnvs: TCanvas;
  RightSpace: Integer;
• Forum: FreePascal

  AW: Text zur Anzeige kürzen mit Punkten hinten

   
    by Guido Eisenbeis, 2. Nov 2011
  Klar, hab ich ja auch geschrieben: "... die Funktion von himitsu in Lazarus ..." . :wink: . Dennoch danke für die Bestätigung. :-D
  
  
  
  
  Ich hab jetzt einige Variationen mit WideString, Unicodestring, UTF8..., usw. probiert, hat sich aber nichts getan. Ich vermute auch viel eher, dass da in der IDE selbst eine Schalter ist, um das einzustellen. Ich hab schon einiges durchsucht (und...
• Forum: FreePascal

  AW: Text zur Anzeige kürzen mit Punkten hinten

   
    by Guido Eisenbeis, 2. Nov 2011
  Den Thread-Titel wurde schon von einem netter Moderator geändert! :-D Danke.
  
  
  
  Das war's! :) Ich wundere mich nur, dass das Lucky nicht aufgefallen ist. Hast du (Lucky) deine Form ganz links oben platziert? Der Text müsste bei dir doch auch verschwinden, wenn die Form woanders ist, oder? :gruebel:
  
  Somit sollte DrawText jetzt abgehandelt sein.
  
  
  Mit DrawTextEx kann man eine Rückgabe als...
• Forum: FreePascal

  AW: Text zur Anzeige kürzen mit Punkte hinten

   
    by Guido Eisenbeis, 31. Okt 2011
  Danke für die ausführliche Beschreibung. Werd ich heute abend testen.
  
  O.T. Wie kann ich denn den Thread-Titel ändern? Der Bearbeiten-Button ist nicht mehr da (Zeitlimit). Hab nämlich erst jetzt gesehen, dass ich "Punkten" ohne "n" geschrieben habe. Wenn's nicht geht, bleibt's so. :mrgreen:
  
  Guido.
• Forum: FreePascal

  AW: Text zur Anzeige kürzen mit Punkte hinten

   
    by Guido Eisenbeis, 31. Okt 2011
  Warum sollte ich da nicht genau hingesehen haben? Ich habs sogar genau hier rauskopiert, zwei neue Projekte erstellt (1x Delphi, 1x Lazarus), ein Paint-Ereignis für Form1 erstellt und deinen Code hinein kopiert. Nix zu sehen.
  
  Guido.
• Forum: FreePascal

  AW: Text zur Anzeige kürzen mit Punkte hinten

   
    by Guido Eisenbeis, 30. Okt 2011
  Kannst du mir das Package umschreiben für Lazarus? :wink:
  
  Ansonsten:
  
  Was ist da nur so interessant an DrawText? Mein oben genannter 5-Zeiler erledigt das doch gut:
  
  + Anwendbar auf die Caption-Eigenschaft
  + gibt eine String zurück
  + evtl. Plattformunabhängig ???
  - Abhängigkeit von Caption (bzw Text)
• Forum: FreePascal

  AW: Text zur Anzeige kürzen mit Punkte hinten

   
    by Guido Eisenbeis, 29. Okt 2011
  Vielen Dank Stahli! :-D
  
  Das hat mir jetzt eine riesen Stein von der Seele purzeln lassen. :thumb: Ich dachte schon, ich wär zu blöd, um ein "Hallo Welt" in ein Panel zu bekommen.
  
  
  
  
  Von Anfang an hatte ich das Gefühl, dass das so läuft. Aus Urzeiten hatte ich diese Probleme noch im Hinterkopf und mein Gefühl hat mich nicht getrogen. Siehe hier:
• Forum: FreePascal

  AW: Text zur Anzeige kürzen mit Punkte hinten

   
    by Guido Eisenbeis, 29. Okt 2011
  Stimmt, ist nur für Pfade. :(
  
  
  
  
  Danke für die Info. Hab EllipsisPosition gefunden beim TLabel in TurboDelphi. In Lazarus scheint's das nicht zu geben. In Delphi scheinbar nur im TLabel?
  
  
  
  Ok, ich sitze jetzt schon über eine halbe Stunde nur daran, ein blöden Text mit DrawText auf ein Panel zu bekommen. (Habs auch mit Form1 versucht.) Ich habe bestimmt 1 Mio. Codes von MSDN bis...
• Forum: FreePascal

  AW: Text zur Anzeige kürzen mit Punkte hinten

   
    by Guido Eisenbeis, 28. Okt 2011
  @BUG
  
  Dein Ansatz ist zwar etwas grob, aber schon ganz gut. :) Mit grob meine ich, dass das Kürzen immer ganze Wörter weg nimmt. Bei längeren Wörtern (z. B. "Weltwirtschaftskrise") wäre das schon jeweils ein ziemlich krasser Sprung. An sich aber eine interessante Idee.
  
  
  
  
  Welche Funktion ist das denn? Die von dir erwähnte DrawText? DrawText will ich nicht. :P
  Nee, Spaß beiseite, für...
• Forum: FreePascal

  Text zur Anzeige kürzen mit Punkten hinten

   
    by Guido Eisenbeis, 28. Okt 2011
  Ich benutze Lazarus im {$mode delphi} für Win 32.
  
  Hier geht es um einen Workaround, der vom Thread Verschiedene Controls an Procedur übergeben "abstammt".
  
  Wenn eine Form in der TitleBar einen langen Text anzeigt und man die Form seitlich verkleinert (zusammenschiebt), wird der Text gekürzt und mit Punkten am Ende dargestellt, sobald der gesamte Text nicht mehr in die TitleBar passt. Dieses...