[RISOLTO] Principianti(!) Parametri Finestre di dialogo.

[DragoRosso]

MessageDlg e QuestionDlg sono funzioni diverse, anche se simili.
Sono definite nel modo in cui sono ... è per quello che ti indicavo che non c'è nulla da risolvere.

Gli argomenti di una funzione, qualsiasi essi siano, non possono essere sostituiti da una unica stringa o altro che non sia previsto dalla funzione stessa.
Il Pascal è un linguaggio rigoroso e il "check" della validità viene fatta a livello di compilazione. E anche se passasse la compilazione, potrebbe essere lo stesso codice della "MessageBox" che a Runtime esegue un suo check e non esegue quanto previsto. "Aggirare" non è una buona azione.

Puoi però costruirti una tua funzione che esegua quello che ritieni più opportuno e nel modo più adatto alle tue esigenze, compreso la visualizzazione di una "MessageBox" personalizzata.

Ciao

[bonmario]

Se può interessare, visto che uno dei motivi di questa discussione era il fatto di avere i bottoni con le scritte in italiano, vorrei aggiungere che in lazarus ci sono questi 3 sorgenti:

lclstrconsts.pas
sysinth.inc
sysconst.pp

che al loro interno contengono le stringhe in inglese. BAsta modificarle col valore italiano, ricompilare lazarus, ed il gioco è fatto.
Io lo faccio ormai da qualche anno, e fino ad ora non mi ha ancora creato problemi questa cosa.

P.S. Naturalmente, per le prime e volte, se lo volete fare, prima fatevi un backup di questi 3 files !!!

Ciao, Mario

[AlexLazarus]

Se può interessare, visto che uno dei motivi di questa discussione era il fatto di avere i bottoni con le scritte in italiano, vorrei aggiungere che in lazarus ci sono questi 3 sorgenti:

lclstrconsts.pas
sysinth.inc
sysconst.pp

che al loro interno contengono le stringhe in inglese. BAsta modificarle col valore italiano, ricompilare lazarus, ed il gioco è fatto.
Io lo faccio ormai da qualche anno, e fino ad ora non mi ha ancora creato problemi questa cosa.

P.S. Naturalmente, per le prime e volte, se lo volete fare, prima fatevi un backup di questi 3 files !!!

Interessante e soprattutto intrigante: mi piace "manomettere" i file che non dovrebbero essere manipolati. 
Tuttavia con il programma ZIP volevo dare la possibilità di modificare i messaggi con un programma EXE da usare in modo indipendente.

[Stilgar]

Ciao.
A parte che non ci voglio credere che Bonmario abbia dato quel suggerimento


LCLStrConsts.pas/SysConst.pas


Le stringhe sono dei riferimenti a delle risorse per il programma.
Nello specifico delle resourcestring.


Volendo ci sono metodi più ortodossi per modificare le stringhe senza segarsi i sorgenti.
Qui c'è qualche spunto.
https://wiki.lazarus.freepascal.org/Using_resourcestrings




Stilgar

[Stilgar]

Ah, per sysinth le uniche stringhe che vedo sono quelle delle localizzazioni per i formati dei numeri e date.


Quelle si possono "applicare" come si vogliono all'avvio dell'applicazione.

Codice: [Seleziona]

var
  DefaultFormatSettings : TFormatSettings = (
    CurrencyFormat: 1;
    NegCurrFormat: 5;
    ThousandSeparator: ',';
    DecimalSeparator: '.';
    CurrencyDecimals: 2;
    DateSeparator: '-';
    TimeSeparator: ':';
    ListSeparator: ',';
    CurrencyString: '$';
    ShortDateFormat: 'd/m/y';
    LongDateFormat: 'dd" "mmmm" "yyyy';
    TimeAMString: 'AM';
    TimePMString: 'PM';
    ShortTimeFormat: 'hh:nn';
    LongTimeFormat: 'hh:nn:ss';
    ShortMonthNames: ('Jan','Feb','Mar','Apr','May','Jun', 
                      'Jul','Aug','Sep','Oct','Nov','Dec');
    LongMonthNames: ('January','February','March','April','May','June',
                     'July','August','September','October','November','December');
    ShortDayNames: ('Sun','Mon','Tue','Wed','Thu','Fri','Sat');
    LongDayNames:  ('Sunday','Monday','Tuesday','Wednesday','Thursday','Friday','Saturday');
    TwoDigitYearCenturyWindow: 50;
  );


  FormatSettings : TFormatSettings absolute DefaultFormatSettings;

Non vedo la necessità di modificare le "impostazioni di fabbrica" direttamente dall'originale.




Stilgar

[bonmario]

Tieni conto che questa cosa l'avevo vista parecchi anni fa, e non ricordo se allora i sorgenti erano come quelli di adesso.
In ogni caso, ,i ero fatto un programma che lancio ad ogni aggiornamento di Lazarus, che fa dei semplici trova e sostituisci in quei sorgenti.

Ciao, Mario

[Stilgar]

La stavo buttando in ridere.


Cmq, potresti aggiornare le cose in modo da avere il .mo con le stringhe localizzate utilizzando gtraslate, o altri servizi on line, per avere tutte le stringhe localizzate.


La butto lì come idea.


Stilgar

[AlexLazarus]

Ah, per sysinth le uniche stringhe che vedo sono quelle delle localizzazioni per i formati dei numeri e date.
Quelle si possono "applicare" come si vogliono all'avvio dell'applicazione.

Codice: [Seleziona]

var
  DefaultFormatSettings : TFormatSettings = (
    CurrencyFormat: 1;
    NegCurrFormat: 5;
    ThousandSeparator: ',';
    DecimalSeparator: '.';
    CurrencyDecimals: 2;
    DateSeparator: '-';

// Eccetera 

  FormatSettings : TFormatSettings absolute DefaultFormatSettings;

Non vedo la necessità di modificare le "impostazioni di fabbrica" direttamente dall'originale.

Wow! Interessante, molto interessante. Grazie!