<?xml version="1.0" encoding="UTF-8"?>
<rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:wfw="http://wellformedweb.org/CommentAPI/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
	xmlns:slash="http://purl.org/rss/1.0/modules/slash/"
	xmlns:georss="http://www.georss.org/georss" xmlns:geo="http://www.w3.org/2003/01/geo/wgs84_pos#" xmlns:media="http://search.yahoo.com/mrss/"
	>

<channel>
	<title>Multimedia Company! &#187; Pemrograman</title>
	<atom:link href="http://ch4r15.wordpress.com/category/pemrograman/feed/" rel="self" type="application/rss+xml" />
	<link>http://ch4r15.wordpress.com</link>
	<description>be a great man 'n great leader</description>
	<lastBuildDate>Wed, 13 Aug 2008 01:00:55 +0000</lastBuildDate>
	<generator>http://wordpress.com/</generator>
	<language>id</language>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
	<cloud domain='ch4r15.wordpress.com' port='80' path='/?rsscloud=notify' registerProcedure='' protocol='http-post' />
<image>
		<url>http://www.gravatar.com/blavatar/cfb1aac282183923cebe8b97564dd139?s=96&#038;d=http://s.wordpress.com/i/buttonw-com.png</url>
		<title>Multimedia Company! &#187; Pemrograman</title>
		<link>http://ch4r15.wordpress.com</link>
	</image>
	<atom:link rel="search" type="application/opensearchdescription+xml" href="http://ch4r15.wordpress.com/osd.xml" title="Multimedia Company!" />
		<item>
		<title>Delphi Find syntax</title>
		<link>http://ch4r15.wordpress.com/2008/06/16/delphi-find-syntax/</link>
		<comments>http://ch4r15.wordpress.com/2008/06/16/delphi-find-syntax/#comments</comments>
		<pubDate>Mon, 16 Jun 2008 08:16:38 +0000</pubDate>
		<dc:creator>kharis</dc:creator>
				<category><![CDATA[PSG]]></category>
		<category><![CDATA[Pemrograman]]></category>

		<guid isPermaLink="false">http://ch4r15.wordpress.com/?p=30</guid>
		<description><![CDATA[begin
with DataModule1.ADOQuery1 do
begin
SQL.Clear;
Active := False;
strSQL := &#8217;select id_pegawai,nm_pegawai,alamat,telp,jns_kelamin from pegawai where id_pegawai=&#8217;;
strSQL := strSQL + QuotedStr(Edit1.Text);
SQL.Text := strSQL;
ExecSQL;
Active := true;
if Not eof then
begin
Edit2.Text := Fields[1].AsString;
Edit3.Text := Fields[2].AsString;
Edit4.Text := Fields[3].AsString;
cmb_1.Items.Add(Fields[4].AsString);
btn_save.Enabled:=false;
btn_update.Enabled := true;
btn_delete.Enabled := true;
btn_clean.Enabled:=true;
endx
else
begin
btn_save.Enabled := True;
btn_update.Enabled := false;
btn_delete.Enabled := False;
btn_clean.Enabled:=true;
end;
end;
       <img alt="" border="0" src="http://stats.wordpress.com/b.gif?host=ch4r15.wordpress.com&blog=3386808&post=30&subd=ch4r15&ref=&feed=1" />]]></description>
		<wfw:commentRss>http://ch4r15.wordpress.com/2008/06/16/delphi-find-syntax/feed/</wfw:commentRss>
		<slash:comments>0</slash:comments>
	
		<media:content url="http://0.gravatar.com/avatar/6b13a84498325036b04e0b42d6c051a2?s=96&#38;d=&#38;r=G" medium="image">
			<media:title type="html">kharis</media:title>
		</media:content>
	</item>
	</channel>
</rss>