| Autor |
Beitrag |
Uli Schoch
Beiträge: 81
|
Verfasst: Do 02.01.03 13:16
Hallo zusammen
Wie verteilt man denn einen Caption eines TButton auf zwei Zeilen?
Gruss
Uli
|
|
Thunderman
Beiträge: 26
|
Verfasst: Do 02.01.03 13:28
Ich weiß nicht sicher, obdas an dieser Stelle auch geht, aber probier einfach mal dass hier:
Button1.Caption := 'Hallo'+#13#10+'Welt';
#13#10 sind die Steuerungszeichen bei Windows, die einen Zeilenumbruch darstellen.
_________________ Thunderman
Bei schwierigen Problemen entscheiden wir uns einfach für die richtige Lösung. Klar?
|
|
Brueggendiek
Beiträge: 304
Win 98, Win98SE, Win XP Home
D5 Std
|
Verfasst: Do 02.01.03 18:05
Hallo!
| Thunderman hat folgendes geschrieben: | | #13#10 sind die Steuerungszeichen bei Windows, die einen Zeilenumbruch darstellen. |
Das stimmt nicht ganz!
#13 oder #$0D oder CTRL+M ist der Wagenrücklauf (CR),
#10 oder #$0A oder CTRL+J ist der Zeilenvorschub (LF).
Unter DOS benötigten die Drucker in der Regel CR/LF - sonst wurde alles in einer Zeile gedruckt.
Bei Delphi-Ausgaben reicht es normalerweise, CR zu schreiben.
Bei tButton klappt das aber nicht, weil da für die Steuerzeichen ein senkrechter Strich erscheint.
Da muß wohl eine entspechende Komponente entwickelt werden.
Gruß
Dietmar Brüggendiek
|
|
torstenheinze
Beiträge: 461
|
Verfasst: Do 02.01.03 18:09
bei labels klappt das aber!
|
|
Uli Schoch 
Beiträge: 81
|
Verfasst: Do 02.01.03 18:22
Hallo zusammen
Das mit dem #13#10 geht nicht bei Buttons, bei Labels schon,
abe nur per Code, nicht im Objektinspektor. Dort hat man auch die Möglichkeit, Wordwrap auf true zu setzen.
Also nach wie vor: wie macht mans bei Buttons????
Gruss
Uli
|
|
torstenheinze
Beiträge: 461
|
Verfasst: Do 02.01.03 18:26
ich hab bei mir mal was installiert, damit ich auch im objektinspector 2 und mehrzeilig schreiben kann, da öffnet sich so ein fenster wie wenn man den string in einem memo bearbeitet. 
|
|
torstenheinze
Beiträge: 461
|
Verfasst: Do 02.01.03 18:26
geht allerdings nicht bei buttons
|
|
XCoder
Beiträge: 36
Win XP
D7 Prof
|
Verfasst: Do 02.01.03 18:44
Hmm ihr könntet euch mal den Zusatz vom Jedi-project runterladen dort verändern sie den Objectinspector so das jede Caption also auch vom Button mehrzeilig wird man drückt mit doppelklick auf Caption im Objectinspector und es öffnet sich so ein schreib Dialog mit Memo ganz nützlich 
Zuletzt bearbeitet von XCoder am Do 02.01.03 18:56, insgesamt 1-mal bearbeitet
|
|
Raphael O.
Beiträge: 1596
VS 2013
|
Verfasst: Do 02.01.03 18:59
Geht ja wohl... 
Einen Button mit mehreren Zeilen Text realisieren
  Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
| procedure TForm1.Button1Click(Sender: TObject);
var
i : integer;
begin
i:=GetWindowLong(Button1.Handle,GWL_STYLE );
SetWindowLong (Button1.Handle,GWL_STYLE , i or BS_MULTILINE);
Button1.Caption := 'Line1'#13#10'Line2';
end; |
Fiji-Fighter
(03.01. 09:20 Tino) Code-Tags hinzugefügt.
|
|
Popov
Gast
Erhaltene Danke: 1
|
Verfasst: Do 02.01.03 19:39
#13#10 hin, #10#13 her - einfach ^j eingeben und schon gibts ein Zeilenumbruch.
|
|
Raphael O.
Beiträge: 1596
VS 2013
|
Verfasst: Do 02.01.03 19:55
Titel: ^j klappt nicht
Bei mir jedenfalls (D6 Personal) klappt es mit ^j nicht, denn dann kommt nur ein senkrechter strich {sch... smilie hatte vorher meinen text weggemacht} 
Wer ist hier der King??
Fiji-Fighter
Zuletzt bearbeitet von Raphael O. am Do 02.01.03 20:01, insgesamt 1-mal bearbeitet
|
|
Popov
Gast
Erhaltene Danke: 1
|
Verfasst: Do 02.01.03 20:06
|
|
Raphael O.
Beiträge: 1596
VS 2013
|
Verfasst: Do 02.01.03 20:13
Titel: label<>button!!!
Deine Lösung funktioniert leider nur mit labels  
Buttons sind aber etwas anderes
und dort kommt nur ein senkrechter strich!!!
jetzt glaubt mal dass ihr mit meiner Lösung zufrieden sein müsst auch wenn sie umständlich ist!!!
Der King hat gesprochen!
Fiji-Fighter
P.S. weitere Wiederrede zwecklos!!!
|
|
Popov
Gast
Erhaltene Danke: 1
|
Verfasst: Do 02.01.03 20:33
@Fiji-Fighter
Es geht hier nicht um den Strich oder sonstwas. Es geht um #13#10 und ^j. Ich hab nicht geschrieben, daß ^j dein Code ersetzt, sondern das es #13#10 ersetzt.
|
|
Uli Schoch
Beiträge: 81
|
Verfasst: Fr 03.01.03 12:53
Hallo Fiji-Fighter
Danke für deine Lösung, sie funktioniert!!!!
Gruss
Uli
|
|
