Przeglądaj źródła

* unicode fix in TDialog.NewLabel

git-svn-id: branches/unicodekvm@48615 -
nickysn 4 lat temu
rodzic
commit
6e845e397f
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      packages/fv/src/dialogs.inc

+ 1 - 1
packages/fv/src/dialogs.inc

@@ -1298,7 +1298,7 @@ end;
 {****************************************************************************}
 {****************************************************************************}
 { TDialog.NewLabel                                                           }
 { TDialog.NewLabel                                                           }
 {****************************************************************************}
 {****************************************************************************}
-function TDialog.NewLabel (X, Y : Sw_Integer; AText : String;
+function TDialog.NewLabel (X, Y : Sw_Integer; AText : Sw_String;
                               ALink : PView) : PLabel;
                               ALink : PView) : PLabel;
 var
 var
   P : PLabel;
   P : PLabel;