zeilenumbruch im label und close button -> hide

[agm65]

hallo leute, 2 frage ! also hab meine labels auf autosize=false und wordwarp = true, das macht mir nen zeilenbruch. der text der labels wird aber aus ini dateien geladen, jetzt wollte ich wissen hab ich in die ini schreiben muss, damit er die zeile bricht ?

Frage2: der [x] button soll meine form nicht schließen sondern hiden....wie war das nochmal ?



1000 dank für hilfe !

[Klaus01]

1. Frage: Nein.
2. Frage: Das event onclose abfangen und dort Form1.hide ausführen

Grüße
Klaus

[agm65]

kriegt das mit dem form close nicht hin ;( !

[Hawkeye219]

Hallo,

das Schließen eines Formulars führt normalerweise zu einem Aufruf der Hide-Methode. In der Online-Hilfe zum Ereignis TForm.OnClose wird erklärt, wie du das Verhalten beim Schließen über den Parameter Action steuern kannst. Beim Hauptformular der Applikation funktioniert dieser Mechanismus allerdings nicht.

Gruß Hawkeye

[agm65]

das heißt: meine hauptform kann ich nicht durch klicken des [x] buttons hiden ?

also hab jetzt Action := caHide und action := caMinimize bei beiden macht er close ?

[marabu]

Hi.

Wenn du die Caption für deine Label-Komponente so in die INI-Datei schreibst:

Code:

[captions]
label1="make my","day"

Dann kannst du die Caption so einsetzen:

Delphi-Quellcode:

function MultiLineText(const s: String): String;
begin
  with TStringList.Create do
  begin
    CommaText := s;
    Result := Text;
    Free;
  end;
end;

begin
  Label1.Caption := MultiLineText(ini.ReadString('captions', 'label1', '?'));
end;

Grüße vom marabu

[agm65]

danke schön...noch ne idee zum [x] button ? ?

[ChrisE]

Versuch doch mal sowas:

Delphi-Quellcode:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose := cbClose.Checked;
  if not cbClose.Checked then Self.Hide;
end;

Hierbei ist zur erwähnen, dass cbClose bei mir eine Checkbox ist. Du solltest halt irgendeine Bool'sche Variable abfragen können ob du schliesen oder "hiden" willst denglisch ist doch super


Gruß, Chris

[Edit] Die Variable CanClose der Methode bestimmt ob das Fenster geschlossen wird, oder der Vorgang abgebrochen wird...[/Edit]

[marabu]

Hallo Chris,

deine Idee ist richtig - aber besser so:

Delphi-Quellcode:

procedure TDemoForm.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose := CheckBox.Checked;
  if not CanClose then
    Application.Minimize;
end;

marabu

[ChrisE]

Hallo marabu,

da stimme ich dir durchaus zu. Das Minimize ist sicher besser, aber die Fragestellung war ja:

Zitat von agm65:

Frage2: der [x] button soll meine form nicht schließen sondern hiden....wie war das nochmal ?

Wollte nur darauf eingehen. Kann ja sein, dass das Fenster wirklich "verschwinden" soll. Nur sollte es dann zumindest im Systray sein, um es wieder her holen zu können.

Aber es stimmt, Minimize wäre besser.

Gruß, Chris

[Edit] Systray erfordert zusätzlich Programmierung[/Edit]