На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
Модераторы: jack128, Rouse_, Krid
  
    > WinAPI аналог функции Format()
      Через Microsoft Visual C Runtime Library (будет работать во всех версиях Windows, начиная с Windows 95 OSR2):
      ExpandedWrap disabled
        function sprintf(buf:pchar;format:pchar):integer; cdecl varargs; external 'MSVCRT.DLL';
        ...
        var
         buf:array[0..MAX_PATH-1] of char;
        begin
          sprintf(buf,'Integer = %d, Hex = %Xh, String = %s',123,123,'aaa');
          MessageBox(0,buf,'Delphi sprintf',0);
        end.

      Через Native API (только для NT):
      ExpandedWrap disabled
        function sprintf(buf:pchar;format:pchar):integer; cdecl varargs; external 'NTDLL.DLL';
        ...
        var
         buf:array[0..MAX_PATH-1] of char;
        begin
          sprintf(buf,'Integer = %d, Hex = %Xh, String = %s',123,123,'aaa');
          MessageBox(0,buf,'Delphi sprintf',0);
        end.

      Автор: Krid
      0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
      0 пользователей:


      Рейтинг@Mail.ru
      [ Script execution time: 0,0323 ]   [ 16 queries used ]   [ Generated: 28.03.24, 14:20 GMT ]