Jump to content

afturk

Members
 View Profile  See their activity

  • Content Count

    4

  • Joined

  • Last visited

Posts posted by afturk

  1. Posted

    Hello, We are using Delphi 12 with the ODAC component for Oracle databases. We are encountering an issue where parameter values are being assigned Chinese text. For example, in the SQL monitor, the parameter values appear as follows:  KEY=['猀愀愀琀攀开最漀爀攀开最攀氀猀椀渀'] Has anyone encountered this issue before? How can we resolve it?

  2. Posted · Edited by afturk

    6 saat önce Lajos Juhász şunları söyledi:

    Yeni bir VCL bileşimi. Formcreate yöntemini oluşturmak için forma çift tıklayın ve mtInformation için simgeyi değiştirmek üzere şu bölümü ekleyin:

     

    prosedürü TForm1.FormCreate(Gönderen: TObject);
    başlangıç
      MsgDlgIcons[TMsgDlgType.mtInformation]:=TMsgDlgIcon.mdiInformation; oğul;

     

    {$R *.dfm} verisinden sonra şunu ekleyin:

     

    günlükler

        Sistem .UITypes ;

     

     

    Bir düğmeyi tamamlayın ve bir tıklamayla birleştirin:

     

    prosedürü TForm1.Button1Click(Gönderen: TObject);
    başlangıç
      MessageDlg('test', TMsgDlgType.mtInformation, mbYesNo, 0) bitiş;

     


     

    Thanks, I misunderstood the situation. 
    It works fine

    Thank you very much 


     

  3. Posted

    I am unable to display the mtInformation icon. Delphi, where exactly do you suggest making changes to fix this? I couldn't find it either.

    What I really want to ask is, what can I do to ensure that the MessageDlg('test', TMsgDlgType.mtInformation, mbYesNo, 0) displays the icon? I don't understand which parts to change if it's not in VCL.Dialogs or System.UITypes. I'm new to Delphi.

  4. Posted

    please excuse my English.
    but I didn't understand
    how did you solve it. I added System.UITypes to the uses section of the relevant forms but where was the code added to System.UITypes.pas. I can't find this part

    MsgDlgIcons[TMsgDlgType.mtInformation]:=TMsgDlgIcon.mdiInformation; I couldn't find where to add this part


    In System.UITypes.pas

    { Message dialog }
    TMsgDlgType = (mtWarning, mtError, mtInformation, mtConfirmation, mtCustom);
    TMsgDlgBtn = (mbYes, mbNo, mbOK, mbCancel, mbAbort, mbRetry, mbIgnore,
    mbAll, mbNoToAll, mbYesToAll, mbHelp, mbClose);
    TMsgDlgButtons = set of TMsgDlgBtn;
    TMsgDlgIcon = (mdiNone, mdiWarning, mdiError, mdiInformation, mdiShield);

    can you help

×