Elektroda.pl
Elektroda.pl
X
Proszę, dodaj wyjątek www.elektroda.pl do Adblock.
Dzięki temu, że oglądasz reklamy, wspierasz portal i użytkowników.

[C++ Borland] TryIcon oraz X

gremlin022 01 Kwi 2011 18:01 957 4
  • #1 01 Kwi 2011 18:01
    gremlin022
    Poziom 7  

    Pierwszy Problem czyli:
    Pisząc program chciałem dodać komponent na forme TTrayIcon
    Niestety zakładka w której się to znajdowało zniknęła.


    [C++ Borland] TryIcon oraz X

    (zakładka powinna byc przedostatnia o nazwie "Samples")
    Co dziwne zakładka istnieje we wszystkich innych projektach
    Dosyć długo się bawiłem i nic mi z tego nie wyszło.
    Zatem jak wstawić dana zakładkę lub TTrayIcon na formę.

    Drugi Problem:
    Pisząc ten sam program chciałem aby nie można było go zamknąć Przyciskiem X
    Znalazłem coś takiego

    Code:

    CanClose=false;
    CanClose=true;

    niestety nie działa
    chciałem aby opcja CanClose (gdyby istniało coś podobnego) mógłbym przełączać
    za pomocą przycisku wiec wciskam przycisk mogę zamknąć aplikacje X'em wciskam przycisk nie mogę wyłączyć aplikacji X'em

    0 4
  • #3 04 Kwi 2011 15:23
    gremlin022
    Poziom 7  

    Ok 1. Project / Options / Packages miałem odznaczony 1 komponent.
    Natomiast 2 OncloseQuery nie wiem co wpisać aby zablokować zamkniecie.

    0
  • #4 04 Kwi 2011 16:42
    arnoldziq
    Moderator Programowanie

    W Delphi składnia jest taka :

    Kod: delphi
    Zaloguj się, aby zobaczyć kod

    W C Builder-ze będzie bardzo podobnie. Zmienna CanClose steruje zezwoleniem na zamknięcie okna lub jego brakiem.

    0
  • #5 04 Kwi 2011 17:45
    gremlin022
    Poziom 7  

    Tia
    Nie zauważyłem w:

    Code:
    void __fastcall TForm1::FormCloseQuery(TObject *Sender, bool &CanClose)
    

    &CacClose

    a wiec zrobilem tak jak chcialem
    wydarzenie FormCloseQuery

    Code:
    void __fastcall TForm1::FormCloseQuery(TObject *Sender, bool &CanClose)
    
    {
    if (Button7->Caption=="CloseOFF")CanClose=false;else CanClose=true;
    }


    oraz wydarzenie naciśniecie przycisku button7

    Code:
    void __fastcall TForm1::Button7Click(TObject *Sender)
    
    {
    if (Button7->Caption=="CloseON") Button7->Caption="CloseOFF";else Button7->Caption="CloseON";
    }


    Więc obaj pkt za pomoc.

    0