4. Buttons lassen sich nicht mehr drücken??

Buttons lassen sich nicht mehr drücken??

  • B

    The Knight schrieb:

    Sie führen ihr programmierte Funktion aus, aber sie lassen sich nicht mehr drücken.

    kann ich mir im moment gerade schlecht vorstellen..
    aber versuch mal

    Button1->Enabled = true;
    0
  • T

    oder du machst eine for, while oder sonstwas schleife, die dein Programm abkacken lässt. in dem fall müsstest du
    Application->ProcessMessages()
    einfügen.

    0
  • B

    auf jedenfall währe der code hilfreich..

    0
  • T

    Im Code ist nichts zufinden, zumindets in der cpp. Ich habe herausgefunden, dass nicht die normalen, sondern die Toolbarbuttons befallen sind. Wie weiter? Welchen Code benötigt ihr?

    0
  • B

    The Knight schrieb:

    Welchen Code benötigt ihr?

    hmmmmmmmm.... vielleicht den code mit dem du die eigenschaften und methoden der buttons ansteuerst, währe mal ein guter anfang... 😉
    und falls der code nicht gerade 5 seiten lang ist, kannst du den rest ja auch posten..

    0
  • T

    Mir ist eingefallen, ich hatte mal kurz einen Fehler gemacht und hatte dummerweise eine Delphi Office XP Menü-Ressource eingebunden. Seitdem ist das so. Nützt euch das was?

    Hier der Inhalt der Texteditor.cpp:

    //---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("PTexteditor.cpp", Form1);
USEFORM("Infofenster.cpp", info);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
        try
        {
                 Application->Initialize();
                 Application->CreateForm(__classid(TForm1), &Form1);
                 Application->CreateForm(__classid(Tinfo), &info);
                 Application->Run();
        }
        catch (Exception &exception)
        {
                 Application->ShowException(&exception);
        }
        catch (...)
        {
                 try
                 {
                         throw Exception("");
                 }
                 catch (Exception &exception)
                 {
                         Application->ShowException(&exception);
                 }
        }
        return 0;
}
//-

    Hier der Inhalt der PTexteditor.h

    #ifndef PTexteditorH
#define PTexteditorH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Buttons.hpp>
#include <ComCtrls.hpp>
#include <Menus.hpp>
#include <Dialogs.hpp>
#include <ToolWin.hpp>
#include <ImgList.hpp>
#include <ActnList.hpp>
#include <StdActns.hpp>
#include <ExtActns.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// Von der IDE verwaltete Komponenten
        TRichEdit *txt_eingabe;
        TMainMenu *menu_bar;
        TMenuItem *Info;
        TMenuItem *Datei2;
        TMenuItem *Beenden3;
        TMenuItem *N2;
        TMenuItem *Druckereinrichtung1;
        TMenuItem *Drucken1;
        TMenuItem *N3;
        TMenuItem *Speichernunter1;
        TMenuItem *Speichern1;
        TMenuItem *ffnen1;
        TMenuItem *Neu2;
        TColorDialog *ColorDialog1;
        TFontDialog *FontDialog1;
        TOpenDialog *OpenDialog1;
        TSaveDialog *SaveDialog1;
        TPrinterSetupDialog *PrinterSetupDialog1;
        TPrintDialog *PrintDialog1;
        TMenuItem *Sonstiges1;
        TMenuItem *Hintergrundfarbe1;
        TMenuItem *Schriftart1;
        TMenuItem *Bearbeiten1;
        TMenuItem *Gehezu1;
        TMenuItem *Ersetzen1;
        TMenuItem *Suchen1;
        TMenuItem *N4;
        TMenuItem *Einfgen1;
        TMenuItem *Kopieren1;
        TMenuItem *Ausschneiden1;
        TMenuItem *N5;
        TMenuItem *WiederholenBefehl1;
        TMenuItem *Rckgngig1;
        TToolBar *tool_bar;
        TToolButton *bar_open;
        TToolButton *bar_save_under;
        TToolButton *bar_print;
        TImageList *ImageList1;
        TActionList *ActionList1;
        TAction *font;
        TAction *open;
        TAction *save_under;
        TMenuItem *mnu_help;
        TMenuItem *mnu_info;
        TAction *size;
        TFindDialog *FindDialog1;
        TReplaceDialog *ReplaceDialog1;
        TStatusBar *status_bar;
        TToolButton *bar_save;
        TToolButton *ToolButton1;
        TToolButton *bar_cut;
        TToolButton *bar_copy;
        TToolButton *bar_insert;
        TToolButton *ToolButton2;
        TToolButton *bar_search;
        TAction *zeilen_info;
        TToolButton *bar_new;
        TMenuItem *Ansicht1;
        TMenuItem *mnu_status_bar_view;
        TMenuItem *mnu_tool_bar_view;
        TMenuItem *Lschen1;
        TMenuItem *N1;
        TMenuItem *Allesmarkieren1;
        TMenuItem *UhrzeitDatum1;
        TToolButton *bar_delete;
        TMenuItem *N6;
        TAction *save_function;
        TAction *new_function;
        TEditPaste *paste_function;
        TEditCopy *copy_function;
        TPopupMenu *popup_menu;
        TMenuItem *popup_menu_new;
        TMenuItem *popup_menu_open;
        TToolButton *bar_replace;
        TToolButton *bar_repeat;
        TToolButton *bar_undo;
        TToolButton *ToolButton10;
        TMenuItem *popup_menu_save;
        TMenuItem *popup_menu_save_as;
        TMenuItem *N7;
        TMenuItem *Rckgngig2;
        TMenuItem *Wiederholen1;
        TMenuItem *N8;
        TMenuItem *Ausschneiden2;
        TMenuItem *Kopieren2;
        TMenuItem *Einfgen2;
        TMenuItem *Lschen2;
        TMenuItem *N9;
        TMenuItem *Suchen2;
        TMenuItem *Ersetzen2;
        TMenuItem *Drucken2;
        TSearchReplace *replace_function;
        TEditDelete *delete_function;
        TEditUndo *undo_function;
        TEditCut *cut_function;
        THelpContents *help_function;
        TPopupMenu *popup_menu_rmb;
        TMenuItem *popup_menu_rmb_undo;
        TMenuItem *N10;
        TMenuItem *popup_menu_rmb_cut;
        TMenuItem *popup_menu_rmb_copy;
        TMenuItem *popup_menu_rmb_insert;
        TMenuItem *popup_menu_rmb_delete;
        TMenuItem *N11;
        TMenuItem *popup_menu_rmb_select_all;
        void __fastcall Hintergrundfarbe1Click(TObject *Sender);
        void __fastcall bar_openClick(TObject *Sender);
        void __fastcall bar_save_underClick(TObject *Sender);
        void __fastcall bar_printClick(TObject *Sender);
        void __fastcall Druckereinrichtung1Click(TObject *Sender);
        void __fastcall Schriftart1Click(TObject *Sender);
        void __fastcall fontExecute(TObject *Sender);
        void __fastcall ffnen1Click(TObject *Sender);
        void __fastcall openExecute(TObject *Sender);
        void __fastcall Speichernunter1Click(TObject *Sender);
        void __fastcall save_underExecute(TObject *Sender);
        void __fastcall Speichern1Click(TObject *Sender);
        void __fastcall mnu_infoClick(TObject *Sender);
        void __fastcall mnu_helpClick(TObject *Sender);
        void __fastcall Neu2Click(TObject *Sender);
        void __fastcall Beenden3Click(TObject *Sender);
        void __fastcall Suchen1Click(TObject *Sender);
        void __fastcall txt_eingabeChange(TObject *Sender);
        void __fastcall txt_eingabeKeyPress(TObject *Sender, char &Key);
        void __fastcall zeilen_infoExecute(TObject *Sender);
        void __fastcall mnu_status_bar_viewClick(TObject *Sender);
        void __fastcall mnu_tool_bar_viewClick(TObject *Sender);
        void __fastcall txt_eingabeKeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
        void __fastcall bar_saveClick(TObject *Sender);
        void __fastcall save_functionExecute(TObject *Sender);
        void __fastcall txt_eingabeMouseDown(TObject *Sender,
          TMouseButton Button, TShiftState Shift, int X, int Y);
        void __fastcall bar_newClick(TObject *Sender);
        void __fastcall new_functionExecute(TObject *Sender);
        void __fastcall UhrzeitDatum1Click(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall paste_functionExecute(TObject *Sender);
        void __fastcall bar_insertClick(TObject *Sender);
        void __fastcall copy_functionExecute(TObject *Sender);
        void __fastcall bar_copyClick(TObject *Sender);
        void __fastcall Einfgen1Click(TObject *Sender);
        void __fastcall Allesmarkieren1Click(TObject *Sender);
        void __fastcall Ersetzen1Click(TObject *Sender);
        void __fastcall replace_functionBeforeExecute(TObject *Sender);
        void __fastcall bar_replaceClick(TObject *Sender);
        void __fastcall delete_functionExecute(TObject *Sender);
        void __fastcall undo_functionExecute(TObject *Sender);
        void __fastcall bar_undoClick(TObject *Sender);
        void __fastcall cut_functionExecute(TObject *Sender);
        void __fastcall bar_cutClick(TObject *Sender);
        void __fastcall Ausschneiden1Click(TObject *Sender);
        void __fastcall bar_deleteClick(TObject *Sender);
        void __fastcall Lschen1Click(TObject *Sender);
        void __fastcall help_functionExecute(TObject *Sender);
        void __fastcall popup_menu_rmb_undoClick(TObject *Sender);
        void __fastcall popup_menu_rmb_cutClick(TObject *Sender);
        void __fastcall popup_menu_rmb_copyClick(TObject *Sender);
        void __fastcall popup_menu_rmb_insertClick(TObject *Sender);
        void __fastcall popup_menu_rmb_deleteClick(TObject *Sender);
        void __fastcall popup_menu_rmb_select_allClick(TObject *Sender);
        void __fastcall txt_eingabeKeyUp(TObject *Sender, WORD &Key,
          TShiftState Shift);
        void __fastcall txt_eingabeMouseUp(TObject *Sender,
          TMouseButton Button, TShiftState Shift, int X, int Y);
private:	// Anwender-Deklarationen
public:		// Anwender-Deklarationen
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
    0
  • D

    Nicht richtig aufgepasst oder? Das ist zwar schön viel Quelltext, aber wie wäre es mit:

    BigNeal schrieb:

    vielleicht den code mit dem du die eigenschaften und methoden der buttons ansteuerst, währe mal ein guter anfang... 😉

    0
  • T
     

    //---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "PTexteditor.h"
#include "Infofenster.h"
#include "POptions.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;

AnsiString app_name;
AnsiString zeilen_gesamt;
int zeilen_zaehler;
int file, size;

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Hintergrundfarbe1Click(TObject *Sender)
{
if (ColorDialog1->Execute()) {
        txt_eingabe->Color = ColorDialog1->Color;
}
}
//---------------------------------------------------------------------------

void __fastcall TForm1::bar_openClick(TObject *Sender)
{
open->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::bar_save_underClick(TObject *Sender)
{
save_under->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::bar_printClick(TObject *Sender)
{
txt_eingabe->Print(app_name + "-Druckauftrag");
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Druckereinrichtung1Click(TObject *Sender)
{
PrinterSetupDialog1->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Schriftart1Click(TObject *Sender)
{
font->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::fontExecute(TObject *Sender)
{
if (FontDialog1->Execute()) {
        txt_eingabe->Font = FontDialog1->Font;
}
}
//---------------------------------------------------------------------------

void __fastcall TForm1::ffnen1Click(TObject *Sender)
{
open->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Speichernunter1Click(TObject *Sender)
{
save_under->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Speichern1Click(TObject *Sender)
{
save_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::mnu_infoClick(TObject *Sender)
{
info->ShowModal();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::mnu_helpClick(TObject *Sender)
{
help_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Neu2Click(TObject *Sender)
{
new_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Beenden3Click(TObject *Sender)
{
Close();        
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Suchen1Click(TObject *Sender)
{
String old="";
int position;
String search=InputBox("Suchen","Nach welchem Wort suchen?",old);
old=search;
position=txt_eingabe->Text.Pos(search)-1;
txt_eingabe->SelStart=position;
txt_eingabe->SelLength=search.Length();
txt_eingabe->SetFocus();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::txt_eingabeChange(TObject *Sender)
{
zeilen_zaehler = txt_eingabe->Lines->Count;
zeilen_gesamt = "Zeilen gesamt: ";
status_bar->Panels->Items[2]->Text = zeilen_gesamt + zeilen_zaehler;

/*file = open("Textdatei",0_CREAT);
size = filelength(file);
close(file);*/
}
//---------------------------------------------------------------------------

void __fastcall TForm1::txt_eingabeKeyPress(TObject *Sender, char &Key)
{
zeilen_info->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::mnu_status_bar_viewClick(TObject *Sender)
{
if (mnu_status_bar_view->Checked==true)
{
        status_bar->Visible=false;
        mnu_status_bar_view->Checked=false;
}
else
{
        status_bar->Visible=true;
        mnu_status_bar_view->Checked=true;
}
}
//---------------------------------------------------------------------------

void __fastcall TForm1::mnu_tool_bar_viewClick(TObject *Sender)
{

if (mnu_tool_bar_view->Checked==true)
{
        tool_bar->Visible=false;
        mnu_tool_bar_view->Checked=false;
}
else
{
        tool_bar->Visible=true;
        mnu_tool_bar_view->Checked=true;
}
}
//---------------------------------------------------------------------------

void __fastcall TForm1::txt_eingabeKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
zeilen_info->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::bar_saveClick(TObject *Sender)
{
save_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::txt_eingabeMouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
zeilen_info->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::bar_newClick(TObject *Sender)
{
new_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::UhrzeitDatum1Click(TObject *Sender)
{
ShortDateFormat = "d.m.yyyy";
LongTimeFormat = "hh:nn";
AnsiString datum = TimeToStr(Time()) + " " + DateToStr(Date());
txt_eingabe->SelText = datum;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
app_name="Editor Clone";
Form1->Caption = "Unbenannt - " + app_name;
if (zeilen_zaehler <= 0)
{
        status_bar->Panels->Items[2]->Text = "Zeilen: 0";
}
if ((IntToStr(txt_eingabe->CaretPos.y) <= 0) && (IntToStr(txt_eingabe->CaretPos.x) <=0))
{
        status_bar->Panels->Items[0]->Text = "Zeile: 1";
        status_bar->Panels->Items[1]->Text = "Spalte: 1";
}
}
//---------------------------------------------------------------------------

void __fastcall TForm1::bar_insertClick(TObject *Sender)
{
paste_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::bar_copyClick(TObject *Sender)
{
copy_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Einfgen1Click(TObject *Sender)
{
paste_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Allesmarkieren1Click(TObject *Sender)
{
txt_eingabe->SelectAll();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Ersetzen1Click(TObject *Sender)
{
replace_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::bar_replaceClick(TObject *Sender)

{
replace_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::bar_undoClick(TObject *Sender)
{
undo_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::bar_cutClick(TObject *Sender)
{
cut_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Ausschneiden1Click(TObject *Sender)
{
cut_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::bar_deleteClick(TObject *Sender)
{
delete_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Lschen1Click(TObject *Sender)
{
delete_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::popup_menu_rmb_undoClick(TObject *Sender)
{
undo_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::popup_menu_rmb_cutClick(TObject *Sender)
{
cut_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::popup_menu_rmb_copyClick(TObject *Sender)
{
copy_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::popup_menu_rmb_insertClick(TObject *Sender)
{
paste_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::popup_menu_rmb_deleteClick(TObject *Sender)
{
delete_function->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::popup_menu_rmb_select_allClick(TObject *Sender)
{
txt_eingabe->SelectAll();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::txt_eingabeKeyUp(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
zeilen_info->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::txt_eingabeMouseUp(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
zeilen_info->Execute();
}
//---------------------------------------------------------------------------

// Funktionen

void __fastcall TForm1::help_functionExecute(TObject *Sender)
{
const static int HELP_TAB = 2;
const static int INDEX_ACTIVE = -2;
Application->HelpCommand(HELP_TAB, INDEX_ACTIVE);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::save_functionExecute(TObject *Sender)
{
if ((SaveDialog1->FileName == "") || (SaveDialog1->FileName == "*.txt"))
{
        SaveDialog1->Execute();
        txt_eingabe->Lines->SaveToFile(SaveDialog1->FileName);
}
else
{
        txt_eingabe->Lines->SaveToFile(SaveDialog1->FileName);
}
}
//---------------------------------------------------------------------------

void __fastcall TForm1::openExecute(TObject *Sender)
{
if (OpenDialog1->Execute())
{
        txt_eingabe->Lines->LoadFromFile(OpenDialog1->FileName);
        Form1->Caption = OpenDialog1->FileName + " - " + app_name;
}
}
//---------------------------------------------------------------------------

void __fastcall TForm1::zeilen_infoExecute(TObject *Sender)
{
status_bar->Panels->Items[0]->Text = "Zeile: " + IntToStr(txt_eingabe->CaretPos.y+1);
status_bar->Panels->Items[1]->Text = "Spalte: " + IntToStr(txt_eingabe->CaretPos.x+1);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::save_underExecute(TObject *Sender)
{
if (SaveDialog1->Execute())
{
        txt_eingabe->Lines->SaveToFile(SaveDialog1->FileName);
}
}
//---------------------------------------------------------------------------

void __fastcall TForm1::delete_functionExecute(TObject *Sender)
{
//txt_eingabe->Lines->Strings[CaretPos.x] = txt_eingabe->Lines->
//Strings[CaretPos.x].Delete(CaretPos.y,1);

TPoint CaretPoint = txt_eingabe->CaretPos;
//txt_eingabe->Lines->Strings[CaretPoint.y] = txt_eingabe->Lines[CaretPoint.y].Delete(CaretPoint.x + 1,1);

txt_eingabe->Lines->Strings[CaretPoint.y] = txt_eingabe->Lines->Strings[CaretPoint.y].Delete(CaretPoint.x + 1,1);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::undo_functionExecute(TObject *Sender)
{
txt_eingabe->Undo();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::paste_functionExecute(TObject *Sender)
{
txt_eingabe->PasteFromClipboard();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::replace_functionBeforeExecute(TObject *Sender)
{
ReplaceDialog1->Execute();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::new_functionExecute(TObject *Sender)
{
txt_eingabe->Lines->Clear();
Form1->Caption = "Unbenannt - " + app_name;
SaveDialog1->FileName = "*.txt";
}
//---------------------------------------------------------------------------

void __fastcall TForm1::copy_functionExecute(TObject *Sender)
{
txt_eingabe->CopyToClipboard();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::cut_functionExecute(TObject *Sender)
{
txt_eingabe->CutToClipboard();
}
//---------------------------------------------------------------------------
    0
  • A

    Hast Du mal die Eigenschaft Style Deiner ToolButtons überprüft?

    Gruß,

    Alexander

    0
  • T

    Toolbar hat kein Style, und die Buttons sind schon Buttons, alles andere passt nicht.

    0
  • A

    The Knight schrieb:

    Toolbar hat kein Style

    Hat ja auch niemand behauptet.

    The Knight schrieb:

    und die Buttons sind schon Buttons, alles andere passt nicht.

    Was ist Bedeutung von dies? 😕

    Du hast - sofern ich Deine Quelltextauszüge richtig deute - doch auch TToolButton-Komponenten
    verwendet? Tritt bei diesen das Problem auf?

    Gruß,

    Alexander

    0
  • T

    Kapiere die Frage nicht. Die normalen Buttons sind nicht betroffen (hab ich mal egschrieben) NUR die Toolbarbuttons haben den Schaden.

    0
  • A

    The Knight schrieb:

    Kapiere die Frage nicht.

    Danke, gleichfalls 😉

    The Knight schrieb:

    Die normalen Buttons sind nicht betroffen (hab ich mal egschrieben) NUR die Toolbarbuttons haben den Schaden.

    So habe ich das auch verstanden. In meiner Version vom BCB (6 Enterprise) haben die TToolButtons eine Eigenschaft Style.
    Bei Dir nicht?

    Gruß,

    Alexander

    BCB-Hilfe zu TToolButton::Style schrieb:

    Die Eigenschaft Style legt den Stil der Schaltfläche fest.

    enum TToolButtonStyle { tbsButton, tbsCheck, tbsDropDown, tbsSeparator, tbsDivider };
    __property TToolButtonStyle Style = {read=FStyle, write=SetStyle, default=0};

    0
  • T

    STyle steht bei mir auf tbsButton. SOnst noch was?

    0
  • A

    The Knight schrieb:

    SOnst noch was?

    Weiß ich nicht - Du hast ja gefragt. 😉

    Wenn Du eine Versionsverwaltung verwendest, könntest Du zur vorherigen Version zurückkehren
    und dann mal vergleichen, was sich geändert hat.

    Alternativ könntest Du natürlich mal das Formular nachbauen (vielleicht auch nur Teile),
    schauen, ob's funktioniert und dann vergleichen. Ein Blick in die .dfm-Datei kann dabei
    auch hilfreich sein.

    Vielleicht stehen ja auch in der Hilfe noch mehr Hinweise oder man kann zu dem Thema über
    Google irgendwas finden...

    Gruß,

    Alexander

    0
Anmelden zum Antworten