- Details
- Written by: Stanko Milosev
- Category: Delphi
- Hits: 6095
Ok, here is my little fun application, sendig messages chat and SMS from Delphi using skype.
First, you have to download skype.
Install it, start it, and create / login to your account.
I will not explain every lines of code, instead, you can download source code it from here, or exe file from here.
Most of the code, I copy/pasted from Dr Bob.
Usefull link, where you can find commads you can find it here.
Also, for begging you can download Skype API Tracer.
For example to send me a message over, in tracer enter:
CHAT CREATE stanko.milosev
As a response you should get something like:
> CHAT #stanko.milosev/$someone;f1d9961217eea925 STATUS DIALOG
Now, copy #stanko.milosev/$someone;f1d9961217eea925 where someone will be your contact name in skype, and now in tracer put something like:
OPEN CHAT #stanko.milosev/$someone;f1d9961217eea925
And next enter something like:
CHATMESSAGE #stanko.milosev/$someone;f1d9961217eea925 Hello Stanko!
And that is all folks!
- Details
- Written by: Stanko Milosev
- Category: Delphi
- Hits: 5177
To save XML in human readable format, using OmniXML you will need these lines of code:
xml := CreateXMLDoc;
xml.PreserveWhiteSpace := False;
...
xml.Save('c:file.xml',ofIndent);
- Details
- Written by: Stanko Milosev
- Category: Delphi
- Hits: 7712
If you are using ClientDataSet, with flat file database (SaveToFile, LoadToFile), then also use:
procedure TDataModule1.ClientDataSet1AfterOpen(DataSet: TDataSet);
begin
ClientDataSet1.LogChanges:=False;
end;
Because otherwise ClientDataSet will remember all changes you did in database, it will slow down application, and xml file can be too big.