unsigned int DoubleToU32(double x)
{
 return (unsigned int)_mm_cvtsd_si32(_mm_set_sd(x));
} 

"Zero, One, Two, Three, Four, Five, Six";

// cl StdLibParse.cpp /O1 /Os /MT /EHsc
// 200,192 Bytes
#include <iostream>
#include <sstream>

int main()
{
 std::string input = "Zero, One, Two, Three, Four, Five, Six";
 std::istringstream ss(input);
 std::string token;
 while(std::getline(ss, token, ',')) 
 {
    std::cout << token << '\n';
 }
  
 return 0;
} 


#if 0

Output:
=======
Zero
 One
 Two
 Three
 Four
 Five
 Six

 #endif

//           TCLib.mak
PROJ       = TCLib

OBJS       = crt_con_a.obj crt_con_w.obj crt_win_a.obj crt_win_w.obj memset.obj newdel.obj printf.obj \
             sprintf.obj _strnicmp.obj strncpy.obj strncmp.obj _strrev.obj strcat.obj strcmp.obj \
             strcpy.obj strlen.obj getchar.obj alloc.obj alloc2.obj allocsup.obj FltToCh.obj atol.obj \
             _atoi64.obj abs.obj
        
CC         = CL
CC_OPTIONS = /D "_CRT_SECURE_NO_WARNINGS" /O1 /Os /GS- /c /W3 /DWIN32_LEAN_AND_MEAN

$(PROJ).LIB: $(OBJS)
    LIB /NODEFAULTLIB /machine:x64 /OUT:$(PROJ).LIB $(OBJS)

.CPP.OBJ:
    $(CC) $(CC_OPTIONS) $<

// cl Parse.cpp /O1 /Os /GS- /Zc:sizedDealloc- /link TCLib.lib kernel32.lib
// 3,584 Bytes
#include <windows.h>
#include "stdlib.h"
#include "stdio.h"

class String
{
 public:
 String()   // Uninitialized Constructor
 {
  this->lpBuffer    = new char[16];
  this->lpBuffer[0] = 0;
  this->iLen        = 0;
  this->iCapacity   = 15;
 }
  
 String(const char* pStr)  //Constructor: Initializes with char*
 {
  this->iLen=strlen(pStr);
  int iNewSize=(this->iLen/16+1)*16;
  this->lpBuffer=new char[iNewSize];
  this->iCapacity=iNewSize-1;
  strcpy(lpBuffer,pStr);
 }

 String& operator=(const char* pStr)  // Assign char* To String
 {
  size_t iNewLen=strlen(pStr);
  if(iNewLen>this->iCapacity)
  {
     delete [] this->lpBuffer;
     int iNewSize=(iNewLen*2/16+1)*16;
     this->lpBuffer=new char[iNewSize];
     this->iCapacity=iNewSize-1;
  }
  strcpy(this->lpBuffer,pStr);
  this->iLen=iNewLen;
    
  return *this;
 }
  
 int ParseCount(const wchar_t c)   //returns one more than # of
 {                                 //delimiters so it accurately
  int iCtr=0;                      //reflects # of strings delimited
  char* p;                         //by delimiter.

  p=this->lpBuffer;
  while(*p)
  {
    if(*p==c)
       iCtr++;
    p++;
  }

  return ++iCtr;
 }
 
 void Parse(String* pStr, char delimiter, size_t iParseCount)
 {
  char* pBuffer=new char[this->iLen+1];  
  if(pBuffer)
  {
     char* p=pBuffer;
     char* c=this->lpBuffer;
     while(*c)
     {
        if(*c==delimiter)
           *p=0;
        else
           *p=*c;
        p++, c++;
     }
     *p=0, p=pBuffer;
     for(size_t i=0; i<iParseCount; i++)
     {
         pStr[i]=p;
         p=p+pStr[i].iLen+1;
     }
     delete [] pBuffer;
  }
 }
   
 char* lpStr()
 {
  return this->lpBuffer;
 } 
 
 void Print(bool blnCrLf)
 {
  printf("%s",lpBuffer);
  if(blnCrLf)
     printf("\n");
 }
   
 ~String()
 {
  delete [] this->lpBuffer;
 } 
  
 private:
 char*  lpBuffer;
 size_t iLen;
 size_t iCapacity; 
};


int main()
{
 String s1       = "Zero, One, Two, Three, Four, Five, Six";  // Assign CSV String To Be Parsed
 int iParseCount = s1.ParseCount(',');                        // Determine Number Of CSVs
 String* pStrs   = new String[iParseCount];                   // Allocate Array To Hold Above Determined Number of CSVs
 s1.Parse(pStrs, ',', iParseCount);                           // Parse The String
 for(int i=0; i<iParseCount; i++)                             // Output The CSVs
     pStrs[i].Print(true);                                    // ....
 delete [] pStrs;                                             // De-Allocate Dynamic Memory
 
 return 0;
}

C:\Code\VStudio\VC15\LibCTiny\x64\Test14>cl Parse.cpp /O1 /Os /GS- /Zc:sizedDealloc- /link TCLib.lib kernel32.lib
Microsoft (R) C/C++ Optimizing Compiler Version 19.00.23506 for x64
Copyright (C) Microsoft Corporation.  All rights reserved.

Parse.cpp
Microsoft (R) Incremental Linker Version 14.00.23506.0
Copyright (C) Microsoft Corporation.  All rights reserved.

/out:Parse.exe
TCLib.lib
kernel32.lib
Parse.obj

C:\Code\VStudio\VC15\LibCTiny\x64\Test14>Parse
Zero
 One
 Two
 Three
 Four
 Five
 Six

C:\Code\VStudio\VC15\LibCTiny\x64\Test14>

#Compile Exe                                          ‘Create Stand Alone Exe as opposed to Dll or Lib
#Dim All                                              ‘Require All Variables To Be Declared

Function PBMain() As Long
  Local iParseCount As Long                           ‘To Contain Number Of CSVs
  Local strLine As Wstring                            ‘A OLE String Engine BSTR To Hold CSVs
  Local pStrs() As Wstring                            ‘A Dynamic Array Of COM BSTRs
  Register i As Long                                  ‘Use Register For Iterator

  strLine="Zero, One, Two, Three, Four, Five, Six"    ‘BSTR Containing CSVs
  iParseCount=ParseCount(strLine,",")                 ‘ParseCount() Returns # of CSVs
  Redim pStrs(iParseCount) As Wstring                 ‘Dynamically Allocate iParseCount # of BSTRs
  Parse strLine, pStrs(), ","                         ‘Parse CSVs Based On ‘,’; Put CSVs Into pStrs()’s Array
  For i=0 To UBound(pStrs, 1) –1                      ‘Iterate Through Array pStrs()
    Console.Print LTrim$(pStrs(i))                    ‘Output Trimmed Strings To Console
  Next i
  Erase pStrs()                                       ‘Release Dynamically Acquired Memory
  Waitkey$

  PBMain=0
End Function

#if 0
Zero
One
Two
Three
Four
Five
Six
#EndIf

// cl Form1.cpp /O1 /Os /GS- /link TCLib.lib kernel32.lib user32.lib
// cl Form1.cpp /O1 /Os /GS- /link kernel32.lib user32.lib gdi32.lib
#define UNICODE        //  3,072 Bytes x64 UNICODE or ASCI With LibCTiny.lib
#define _UNICODE       // 84,992 Bytes With C Standard Library Loaded (LIBCMT.LIB)
#include <windows.h>
#include "tchar.h"

LRESULT CALLBACK fnWndProc(HWND hwnd, unsigned int msg, WPARAM wParam, LPARAM lParam)
{
 if(msg==WM_DESTROY)
 {
    PostQuitMessage(0);
    return 0;
 }

 return (DefWindowProc(hwnd, msg, wParam, lParam));
}

int WINAPI _tWinMain(HINSTANCE hInstance, HINSTANCE hPrevIns, LPTSTR lpszArgument, int iShow)
{
 WNDCLASSEX wc={0};
 MSG messages;
 HWND hWnd;

 wc.lpszClassName = _T("Form1");
 wc.lpfnWndProc   = fnWndProc;
 wc.cbSize        = sizeof(WNDCLASSEX);
 wc.hInstance     = hInstance;
 wc.hbrBackground = (HBRUSH)COLOR_BTNSHADOW;
 RegisterClassEx(&wc);
 hWnd=CreateWindowEx(0,_T("Form1"),_T("Form1"),WS_OVERLAPPEDWINDOW|WS_VISIBLE,200,100,325,300,HWND_DESKTOP,0,hInstance,0);
 while(GetMessage(&messages,NULL,0,0))
 {
    TranslateMessage(&messages);
    DispatchMessage(&messages);
 }

 return messages.wParam;
}

'PowerBASIC Version Form1  Disk Image 6656 bytes;  size on disk 8192; Windows Explorer 7K
#Compile Exe
#Dim     All
#Include Once "Win32Api.inc"


Function fnWndProc(ByVal hWnd As Long, ByVal msg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
  If msg=%WM_DESTROY Then
     Call PostQuitMessage(0)
     fnWndProc=0 : Exit Function
  End If
  fnWndProc=DefWindowProc(hWnd, msg, wParam, lParam)
End Function


Function WinMain(ByVal hInstance As Long, ByVal hPrevIns As Long, ByVal lpszArgument As Asciiz Ptr, ByVal iShow As Long) As Long
  Local szClassName As Asciiz*8
  Local wc As WNDCLASSEX
  Local Msg As tagMsg
  Local hWnd As Dword

  szClassName             = "Form1"
  wc.lpszClassName        = VarPtr(szClassName)
  wc.lpfnWndProc          = CodePtr(fnWndProc)
  wc.cbSize               = SizeOf(wc)
  wc.hbrBackground        = %COLOR_BTNSHADOW
  wc.hInstance            = hInstance
  RegisterClassEx(wc)
  hWnd=CreateWindowEx(0,szClassName,szClassName,%WS_OVERLAPPEDWINDOW,200,175,320,300,%HWND_DESKTOP,0,hInstance,ByVal 0)
  ShowWindow(hWnd,iShow)
  While GetMessage(Msg,%NULL,0,0)
    TranslateMessage(Msg)
    DispatchMessage(Msg)
  Wend

  WinMain=msg.wParam
End Function

char
wchar_t 

#include <stdio.h>

int main(void)
{
 char szBuffer[]="Hello, World!";
 printf("%s\n",szBuffer);
 return 0;
}

char* utf8string = ...;
wchar_t wide[256]; // whatever max size you want, or get size first and allocate on heap/pool
MultiByteToWideChar(CP_UTF8, 0, utf8string, strlen(utf8string), wide, ArrayCount(wide));
WindowsApiFunction(wide, ...);

// DPI Handling
double dpiX, dpiY;
double rxRatio, ryRatio;
hDC = GetDC(NULL);
dpiX=GetDeviceCaps(hDC, LOGPIXELSX);
dpiY=GetDeviceCaps(hDC, LOGPIXELSY);
rxRatio=(dpiX/96);
ryRatio=(dpiY/96);

hWnd=CreateWindowEx(0, szClassName, szClassName, WS_OVERLAPPEDWINDOW, 75, 75, 320, 300, HWND_DESKTOP, 0, hIns, 0);

#define SizX(x)      x * rxRatio
#define SizY(y)      y * ryRatio

…so the above CreateWindowEx() call becomes even simpler…

[code]
hWnd=CreateWindowEx(0, szClassName, szClassName, WS_OVERLAPPEDWINDOW, SizX(75), SizY(75), SizX(320), SizY(300), HWND_DESKTOP, 0, hIns, 0);

#ifdef _M_IX86

unsigned int __cdecl DoubleToU32(double x)
{
 return (unsigned int)_mm_cvttsd_si32(_mm_set_sd(x));
}

#endif

while(k<=17)
{
  if(k == i)
     k++;
  *(p1+k)=48+(char)n;
  x=x*10;
  #ifdef _M_IX86
     n=DoubleToU32(x);
  #else   
     n = (size_t)x;
  #endif   
  x = x-n;
  k++;
}

extern "C" long __cdecl _ftol2_sse(double x)
{
 return _mm_cvtsd_si32(_mm_set_sd(x));
}


extern "C" long __cdecl _ftol2(double x)
{
 return _mm_cvtsd_si32(_mm_set_sd(x));
}  

extern "C" long _ftol2(float x)
{
 return _mm_cvtss_si32(_mm_set_ss(x));
} 

extern "C" long _ftol2_sse(float x)
{
 return _mm_cvtss_si32(_mm_set_ss(x));
}

// cl StrTst5.cpp /O1 /Os /GS- /link TCLib.lib kernel32.lib 
#include <windows.h>
#include "stdlib.h"
#include "stdio.h"

extern "C" int   _fltused=1;
#define SizX(x)  x * rxRatio

int main()
{
 double rxRatio    = 1.25;
 int    iColWidths = 110;
 DWORD  pColWidths;

 pColWidths = SizX(iColWidths);
 printf("pColWidths = %u\n",pColWidths); 
 getchar();
 
 return 0;
}

C:\Code\VStudio\Grids\x86>cl StrTst5.cpp /O1 /Os /GS- /link TCLib.lib kernel32.lib
Microsoft (R) 32-bit C/C++ Optimizing Compiler Version 15.00.21022.08 for 80x86
Copyright (C) Microsoft Corporation.  All rights reserved.

StrTst5.cpp
Microsoft (R) Incremental Linker Version 9.00.21022.08
Copyright (C) Microsoft Corporation.  All rights reserved.

/out:StrTst5.exe
TCLib.lib
kernel32.lib
StrTst5.obj

C:\Code\VStudio\Grids\x86>StrTst5
pColWidths = 137

pGridData2->pColWidths[i] = SizX(strFieldData[0].iVal());  //  <<< Line Causing Problems!!!