Mensagem Alerta

[Ismael.Pastori]

Boa Tarde

Alguém poderia me dar um exemplo de como eu acesso a o item abaixo para que configure a mensagem de Alerta ?!

// O Formato da mensagem de erro pode ser alterado pelo usuario alterando-se a property FFormatoAlerta: onde;

// %TAGNIVEL% : Representa o Nivel da TAG; ex:

// %TAG% : Representa a TAG; ex:

// %ID% : Representa a ID da TAG; ex X34

// %MSG% : Representa a mensagem de alerta

// %DESCRICAO% : Representa a Descrição da TAG

s := FOpcoes.FFormatoAlerta;

s := stringReplace(s, '%TAGNIVEL%', FTagNivel, [rfReplaceAll]);

s := stringReplace(s, '%TAG%', TAG, [rfReplaceAll]);

s := stringReplace(s, '%ID%', ID, [rfReplaceAll]);

s := stringReplace(s, '%MSG%', Alerta, [rfReplaceAll]);

s := stringReplace(s, '%DESCRICAO%', Trim(Descricao), [rfReplaceAll]);

if Trim(Alerta) <> '' then

FListaDeAlertas.Add(s);

Obrigado!