아래 소스코드를 파스칼(델파이)로 변경 하고자 합니다. C를 전혀 해보지 않아서 어떻게 해야 할지 알수가 ㅇ벗네요. 고수님들의 도움을 부탁드리고자 이렇게 질문드려 봅니다.
염치 없는 부탁이지만 좀 부탁드립니다.

void CPhoneNoDlg::PopulateLines()
{
    LPLINEDEVCAPS   pldc = 0;
    for( DWORD nLineID = 0; nLineID < m_nLines; nLineID++ )
    {
        if( ShouldShowLine(nLineID) &&
            ::MyGetLineDevCaps(m_hLineApp, m_aApiVersions[nLineID], nLineID, &pldc) == 0 )
        {
            CString sLine;
            sLine.Format("Line %d: %s", nLineID + 1, ::MyGetLineName(pldc));
            int nIndex = m_listLines.AddString(sLine);
            if( nIndex >= 0 )
            {
                m_listLines.SetItemData(nIndex, nLineID);

                if( nLineID == m_nLineID )
                {
                    m_listLines.SetCurSel(nIndex);
                }
            }
        }
    }

    ::free(pldc);
}


LPCSTR MyGetLineName(
    LINEDEVCAPS*    pd)
{
    ASSERT(pd);
    return (pd->dwLineNameSize ? (LPCSTR)(BYTE*)pd + pd->dwLineNameOffset : "");
}