ABADev blog

Category: Soft/Programming

  • code signing

    http://www.matthew-jones.com/articles/codesigning.html

  • ADO connection string and Excel 12

    xlsx:
    Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:\myFolder\myExcel2007file.xlsx;Extended Properties=“Excel 12.0 Xml;HDR=YES;IMEX=1”;

    xlsb:
    Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:\myFolder\myBinaryExcel2007file.xlsb;Extended Properties=“Excel 12.0;HDR=YES”;

    xlsm:
    Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:\myFolder\myExcel2007file.xlsm;Extended Properties=“Excel 12.0 Macro;HDR=YES”;

    See also my prev. post about driver download: https://blog.abadev.com/?p=1030

  • send CD and/or certificate

    Если бы я нашел какой-нибудь сервис (в Европе и США), который бы позволил недорого рассылать “разовые” CD с небольшим напечатаным письмом, я бы некоторым своим покупателям после регистрации высылал бы диск и красивую бумажку с сертификатом. Просто делать это самому из Украины муторно (каменный век с “носителем информации”), а за рубежом разовые посылки тоже никто слать не будет.

    А еще можно к какому-нибудь празднику выслать всем юзерам красивые открытки+ручку/кепку/чашку
    Очень хочется такое осуществить. Надеюсь, что сделаб и не разорюсь полностью:-)

  • new server

    In friday we moved on new server in Toronto from old in Vancuver.

    All services (blog, photo galeries, all domains/sites, mailboxes etc) works well as I see.
    www.budgetreseller.com

  • Виртуальная веб-камера. Virtual WebCam. Webcam simulator.

    Случайно увидел запрос от stenanie.livejournal.com

    “Хочу, чтобы в системе были веб-камеры, которых на самом деле нет. И чтобы с них шла картинка из какого-нибудь AVI-файла. Искал разные штуки в Google – слишком всего дофига, куча всего платного. Непонятно, что выбрать, посоветуйте может быть.

    Второй уровень сложности той же задачи – виртуальная веб-камера выдаёт не картинку из готового AVI-файла, а картинку с реальной веб-камеры (или другой виртуальной), с наложенными на неё эффектами.”

    Очень хорошая идея для shareware

  • get default system charset

    function TranslateCharsetInfo(lpSrc: integer;
      var lpCs: TCharsetInfo; dwFlags: DWORD): BOOL; stdcall;
      external ‘gdi32.dll’ name ‘TranslateCharsetInfo’;

    function GetDefaultCharset: TFontCharset;
    var
      dwCodePage: dWord;
      CharSetInfo: TCharSetInfo;
    begin
      {get default codepage}
      dwCodePage := StrToIntDef(GetLocaleStr(GetUserDefaultLCID, LOCALE_IDEFAULTANSICODEPAGE, ”), 0);
      if dwCodePage = 0 then
        dwCodePage := StrToIntDef(GetLocaleStr(GetSystemDefaultLCID, LOCALE_IDEFAULTANSICODEPAGE, ”), GetACP());
      {convert codepage into charset}
      if TranslateCharsetInfo(dwCodePage, CharSetInfo, TCI_SRCCODEPAGE) then
        Result := CharSetInfo.ciCharset
      else
        Result := 0
    end;

  • directives for D2007 complier

    {$IFDEF VER200}
      {$DEFINE SMForDelphi3}
      {$DEFINE SMForDelphi4}
      {$DEFINE SMForDelphi5}
      {$DEFINE SMForDelphi6}
      {$DEFINE SMForDelphi7}
      {$DEFINE SMForDelphi2005}
      {$DEFINE SMForDelphi2006}
      {$IFDEF BCB}
        {$DEFINE SMForBCB2006}
        {$DEFINE SMForBCB2007}
        {$DEFINE SMForBCB2009}
      {$ENDIF}
      {$DEFINE SMForDelphi2007}
      {$DEFINE SMForRADStudio2007}
      {$DEFINE SMForDelphi2009}
    {$ENDIF}

  • minor changes for viewers

    Just found that most menu items have no any defined shortcut. For example, Open ->Ctrl+O, Save->Ctrl+S etc

    Fixed today:-)

  • TSMReport component: load/save from streams

    the TSMReport component now have the LoadReportFromStream and SaveReportToStream methods
    Using these methods you may load/save the reports in any stream, including BLOB-streams for field in any dataset or implement the packed/encoded streams (zip/ZLib, for example)

  • Viewer for MS Outlook Messages: testimonials

    Thanks for the software which has rescued a problem I have had while away from the office with Microsoft Outlook failing to install.

    Professor David Cope