Delphi MySql components

Delphi ашиглан програм бичдэг мэргэжил нэгт залуусдаа Delphi гээс MySql-ийн db-тэй шууд /direct connection/ холбогдох компонентуудыг танилцуулж байна.

1. mydac.v5.20.1.14.src.rar - download http://rapidshare.com/files/156973251/mydac.v5.20.1.14.src.rar.html

2. CoreLab.MySQL.Data.Access.Components.v5.20.for.Delphi.BCB.Full.Sources.zip - download
http://rapidshare.com/files/156975420/CoreLab.MySQL.Data.Access.Components.v5.20.for.Delphi.BCB.Full.Sources.zip.html

3. sbmc2006.4.5.rar - download http://rapidshare.com/files/156973368/sbmc2006.4.5.rar.html

Эдгээр компонентууд таны хайж байсан компонент мөн гэж найдаж байна. Мөн танд хэрэгтэй компонент олдохгүй байвал коммент бичиж үлдээгээрэй. Юмыг яаж мэдэх вэ надад тэр компонент чинь байж магад.

Та бүхэн хүлээн авч таалан соёрхоно уу.
Read more...

Windows delay problem

Мэргэжил нэгт нөхөд минь ээ надад нэг асуудал тулгараад байна. Delphi дээр sleep(1) гэсэн sleep(10) гэсэн хоёр ямарч ялгаагүй хугацаа зарцуулаад байна. Дан ганц Delphi биш C# дээр бас энэ асуудал гарч байсан. Уул нь sleep(1) нь 1 миллисекунд, sleep(10) нь 10 миллисекунд хугацаа зарцуулмаар юм. Гэхдээ бас дандаа ийм бишээ. Хааяа зүгээр болчихдог. Энэ их сонирхолтой байгаамаа. Яг юунаас шалтгаалаад ийм гажиг үүсээд байгааг би сайн мэдэхгүй байна. Та нарт ийм асуудал тулгарч байсан уу?

Энийг зүгээр болгодог нэг тохиолдол олсон л доо. Өөрийн компьютер дээрээ Virtual Machine (VMWare) ажиллуулахаар зүгээр болчихдог юм байна лээ.

Энэ асуудлыг шийдэх арга байна уу? Туслаарай.

Delphi код

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms, Dialogs, StdCtrls;

type

TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

TMProgrsThread = class (TThread)
FX, FY, FDelay: integer;
procedure Execute; override;
constructor Create(AX, AY, ADelay: integer);
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

constructor TMProgrsThread.Create;
begin
inherited Create(False);
FX:=300;
FY:=AY;
FDelay:=ADelay;
FreeOnTerminate:=True;
end;

procedure TMProgrsThread.Execute;
begin
while not Terminated do begin
if FX>0 then FX:=FX-1 else FX:=300;
Form1.Canvas.Lock;
Form1.Canvas.Rectangle(FX, FY, FX+50, FY+50);
form1.Canvas.Unlock;
Sleep(FDelay);
end;
end;

procedure TForm1.Button1Click(Sender: TObject);
var t1, t2: TMProgrsThread;
begin
t1:=TMProgrsThread.Create(10, 30, 1);
t2:=TMProgrsThread.Create(10, 100, 10);
end;

end.

Read more...

Delphi 6 + unicode

Би delphi 6-г ашиглаад 7, 8 жил болж байна. Саяхнаас unicode ашигласан програм бичих боломжтой component олоод бөөн баяр. Та бүхэнд TMS Unicode Component Pack v1.5.0.1 -ийг танилцуулж байгаадаа баяртай байна.

Энд delphi-ийн бүх стандарт component-уудыг unicode дэмждэг болгосон хувилбарууд байгаа. Та бүхэнд амжилт хүсье.

Download component

http://rapidshare.com/files/154771518/TMS_Unicode_Component_Pack_v1.5.0.1.rar.html

Read more...

Delphi send mail

Delphi 6 -аас email илгээх хамгийн амархан арга

var Smtp: TNMSMTP;

.....

(*************** SENDING EMAIL *****************)

if not Smtp.Connected then begin

Smtp.Host:=EmailServerHost;

Smtp.Port:=EmailServerPort;

Smtp.UserID:=EmailFromAddress;

Smtp.Connect;

end;


if Smtp.Connected then begin

with Smtp.PostMessage do begin

FromAddress:=EmailFromAddress;

ToAddress.Text:=EmailToAddress;

Body.Text:=EmailBody;

Subject:=EmailSubject;

if FileExists(ExportFileName) then Attachments.Add(ExportFileName);

end;

Smtp.SendMail;

end;

.....

Read more...

Earning AdSense Revenue: How Many Websites to Build? - Part 1

Google AdSense is really a great money making program for webmasters. Before the existence of AdSense program. Making money online used to be very difficult. You will need to have a high quality product, possess advanced Internet marketing skills and be willing to invest a sum of money for setting up professional sale website and launching advertising different campaigns. You either make big money because of you product is selling well or make little that not even enough for covering your cost if the product doesn't sell.

The launched of Google AdSense changed everything. People have more choices when thinking about making money online. They no longer have to sell products on the Internet in order to earn income online. With Google AdSense program, they can become an AdSense publisher and earn ad revenue by displaying AdSense ads on their content-based website.

The Basic of Google AdSense
The concept is pretty simple. You put up a website with good content, insert your AdSense ads into your content site, and then drive targeted traffic to your website. Part of your visitors who finish reading your content will read your AdSense ad and click on it. For each ad click, you usually earn anywhere between $0.10 to $0.60 depends on the niche of your site. Those publishers who gain large traffic have earned thousands or even ten thousands dollar of AdSense revenue.

Some publishers use one or two websites to make money with AdSense, some have their own networks containing a lot of websites displaying AdSense ads which make them lucrative AdSense revenue.

Why You Shouldn’t Focus on Many Websites
As an individual publisher, it is always best to focus on using only one or two websites for AdSense program. While building a network of websites such as building fifteen content websites in different niches seem to be a great idea to earn money with AdSense. The idea assumes that you can generate $3 to $5 AdSense revenue from each site daily making a daily total of $45 to $75 AdSense income if you own fifteen website. But, practically it is very hard to succeed this way.

To make AdSense works for you, each of your sites must have quality unique content. With 15 sites, it is not possible to create unique and good content for each site by you alone. Getting help from the professional writers seems to be a good solution. But those who can write quality content are often expensive to hire. You will have a lot of writer fee to pay before you earn a single dime from AdSense.

Another problem with this idea is the website-promotion part. To make each of the websites earns AdSense income; you must be able to drive a reasonable amount of targeted traffic to each site every day. With so many content sites you maintained, you will never have enough time and energy to generate consistent traffic to your all the sites. As you aren't staying focus, you could get tire and bored easily which end up none of the sites generate revenue for you.

The publishers who really make a big money with a network of websites are those who are serious about web publishing. They have a group of experts to help him/her to create unique quality content, handle web design and do AdSense optimization with sufficient financial resources to back their plan.
Read more...