Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=156092&view=findpost&p=1282747 Thu, 28 Sep 2006 16:20:29 +0000 WinAPI аналог функции Format() https://forum.sources.ru/index.php?showtopic=156092&view=findpost&p=1282747 Microsoft Visual C Runtime Library (будет работать во всех версиях Windows, начиная с Windows 95 OSR2):
    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):
    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]]> Krid Системные функции, WinAPI, работа с железом