ABADev blog

Blog

  • server in Canada

    Paid for next year for server in Canada.

  • TSMExportToXML: create xml compatible with ADO.NET

    Today I added the new feature in SMExport – to create the xml file from dataset which is compatible with ADO.NET.

    Small sample code:

        smeXML := TSMExportToXML.Create(nil);
    try
      smeXML.DataSet := ClientDataSet;
      smeXML.ColumnSource := csDataset;
      smeXML.FileName := ADOXMLFileName;

      smeXML.AddTitle := True;
      smeXML.Format := xmlADO;
      smeXML.XMLTags.RowTag := 'z:row';
      smeXML.DataFormats.CustomDateTimeFormat := 'yyyy-mm-ddThh:nn:ss';

      smeXML.Execute;
    finally
      smeXML.Free;
    end;

  • qiwi

    Today I registered the account in QIWI

    Later I will try to register there the account for business (to receive the payments)

  • SIM: resend license

    Today in SIM (Shareware Information Manager) I added the feature to re-send the license for old orders. Just search in database the infrormation about reg.folder, userid+password and re-generate the mail for customer.

    Also minor modification is in algorithm for random password: at least one digit must exists in strong password. Else CPanel will popup the warning.

  • Idea for Facebook application – Friend’s gift

    anyone may select some product(s) in online shop(s) and their friends may “transfer” the part of sum to “basket”. When the total amount in basket is equal or greater than product price, this product will be ordered and sent/delivered to original user.
    May be integrated with ebay, aliexpress etc

    PS today announced the similar service: wishkey.ru

  • dialup

    Еще недавно основным способом коннектиться в интернет был dialup. У меня до сих пор лежат несколько модемов среди хлама, который жалко выбросить (а вдруг еще пригодиться)

    А вот интересно – сейчас им кто-то активно пользуется? По идее наверное нет. Ведь есть всякие 3G для кратковременного использования…

  • 42

    Скоро поздравлять будут роботы. По СМС пришло поздравление от страховой (PZU), по почте от всяких inet магазинов. Даже google вываливает персонально на главном экране:

    Happy Birthday 2013

  • SMMsg suite: how to create the .eml file from code

    I created the new sample project where I shown how you may create the .eml file from your code using SMMsg suite:

    uses SMMsg, SMMSGTags;

procedure TfrmMain.btnCreateEMLClick(Sender: TObject);
var
  eml: TSMEMLFile;
begin
  eml := TSMEMLFile.Create(Self);
  try
    eml.Properties.AddTypedValue(PR_SENT_REPRESENTING_EMAIL_ADDRESS, '[email protected]');
    eml.Properties.AddTypedValue(PR_RCVD_REPRESENTING_EMAIL_ADDRESS, '[email protected]');
    eml.Properties.AddTypedValue(PR_CLIENT_SUBMIT_TIME, Now());
//    eml.Properties.AddTypedValue(PR_MESSAGE_CODEPAGE, 1251);
    eml.Properties.AddTypedValue(PR_SUBJECT, 'Subject');

    eml.Properties.AddTypedValue(PR_BODY,
               'Hello,'#13#10+
               #13#10+
               'you may visit our site http://www.scalabium.com'#13#10+
               'or contact by email [email protected]'#13#10+
               #13#10+
               'With best regards, Mike Shkolnik');

    eml.Properties.AddTypedValue(PR_BODY_HTML,
               ''#13#10+
               ''#13#10+
               ''#13#10+
               ''#13#10+
               '
    Hello,
    '#13#10+
               '
    you may visit our site http://www.scalabium.com
    '#13#10+
               'or contact by email [email protected]
    '#13#10+
               '
    With best regards, Mike Shkolnik
    '#13#10+
               '');

    eml.Properties.AddAttachmentFile(ExtractFilePath(Application.ExeName) + 'scalfaq.gif');

    eml.SaveToEMLFile(ExtractFilePath(Application.ExeName) + 'test.eml', True)
  finally
    eml.Free
  end;

  ShowMessage('File ' + ExtractFilePath(Application.ExeName) + 'test.eml' + ' created succesfully');
end;

  • Visa Internet/приватбанк

    Приватбанк отменил комиссию в 35 центов за каждую транзакцию по карте Visa Internet

    Мне сейчас это подтвердил оператор в livechat

  • new product: DBISAM To Text converter

    New DBISAM To Text converter published.
    Very fast converter to text and CSV format from Elevate DBISAM tables.