From a26413a78a35f238ea48629f6e7c52d3aa4deac7 Mon Sep 17 00:00:00 2001 From: pierre Date: Wed, 18 Feb 2004 05:50:38 +0000 Subject: [PATCH] *fix for MessageBox error by Berthold Studemund --- fv/msgbox.pas | 13 ++++++++----- fvision/msgbox.pas | 13 ++++++++----- 2 files changed, 16 insertions(+), 10 deletions(-) diff --git a/fv/msgbox.pas b/fv/msgbox.pas index 04c390f29c..b036ba698b 100644 --- a/fv/msgbox.pas +++ b/fv/msgbox.pas @@ -277,10 +277,10 @@ begin ButtonName[1] := Labels^.Get(slNo); ButtonName[2] := Labels^.Get(slOk); ButtonName[3] := Labels^.Get(slCancel); - Titles[0] := Labels^.Get(sWarning); - Titles[1] := Labels^.Get(sError); - Titles[2] := Labels^.Get(sInformation); - Titles[3] := Labels^.Get(sConfirm); + Titles[0] := Strings^.Get(sWarning); + Titles[1] := Strings^.Get(sError); + Titles[2] := Strings^.Get(sInformation); + Titles[3] := Strings^.Get(sConfirm); end; procedure DoneMsgBox; @@ -291,7 +291,10 @@ END. { $Log$ - Revision 1.4 2002-09-07 15:06:38 peter + Revision 1.5 2004-02-18 05:50:38 pierre + *fix for MessageBox error by Berthold Studemund + + Revision 1.4 2002/09/07 15:06:38 peter * old logs removed and tabs fixed } diff --git a/fvision/msgbox.pas b/fvision/msgbox.pas index 04c390f29c..b036ba698b 100644 --- a/fvision/msgbox.pas +++ b/fvision/msgbox.pas @@ -277,10 +277,10 @@ begin ButtonName[1] := Labels^.Get(slNo); ButtonName[2] := Labels^.Get(slOk); ButtonName[3] := Labels^.Get(slCancel); - Titles[0] := Labels^.Get(sWarning); - Titles[1] := Labels^.Get(sError); - Titles[2] := Labels^.Get(sInformation); - Titles[3] := Labels^.Get(sConfirm); + Titles[0] := Strings^.Get(sWarning); + Titles[1] := Strings^.Get(sError); + Titles[2] := Strings^.Get(sInformation); + Titles[3] := Strings^.Get(sConfirm); end; procedure DoneMsgBox; @@ -291,7 +291,10 @@ END. { $Log$ - Revision 1.4 2002-09-07 15:06:38 peter + Revision 1.5 2004-02-18 05:50:38 pierre + *fix for MessageBox error by Berthold Studemund + + Revision 1.4 2002/09/07 15:06:38 peter * old logs removed and tabs fixed }