Dukungan Unicode pada FreePascal

Pemecahannya semua tipe data PChar/PAnsiChar pada proyek Delphi 2006 atau FreePascal diganti dengan PWideChar.

library libtest;

function pesan(data: PWideChar): PWideChar; stdcall; export
begin
  pesan:=data;
end;

exports
  pesan;

begin
end.

Jadi penggunaan Unicode dibawah versi Delphi 2010 harus memakai PWideChar. Ini juga berlaku pada FreePascal. Mungkin saja suatu saat FreePascal akan mengikuti Delphi 2010 mengubah PChar dari ANSI menjadi UNICODE. Tapi penulis lebih suka PChar tetap menjadi dirinya sendiri, dan biarlah pekerjaan UNICODE diserahkan kepada PWideChar. Sebab akan merusak kompatibiltas kode program yang dibuat dengan versi terdahulu.

2010
01/31
CATEGORY
Learning
Posts
Solutions
TAGS
Write comment

Script for building FreePascal and Lazarus for arm processor & WinCE OS

Sometime I will build my freepascal and lazarus that supported by arm processor and WinCE OS. So now I will create a batch file for automation build. Every I use freepascal and lazarus newly, just run this batch script. This batch script running only in Win32 environment.

To run the script just type
PrepareLazarusForWinCE.bat LocationLazarusSource
Example:
PrepareLazarusForWinCE.bat C:\Lazarus

Before we use the script, we must set some variables needed.

SET ARMBINUTILS=FillTheLocationWhereArmBinUtilsInstalled
SET FPCDIR=FillTheLocationWhereFreePascalInstalled
SET FPCSRC=FillTheLocationWhereFreePascalSourceInstalled

Example:

C:\Windows\system32>SET ArmBinUtils=c:\opt\App\binutils\arm
C:\Windows\system32>set FPCDIR=c:\opt\app\FPC\2.2.4
C:\Windows\system32>set FPCSRC=c:\opt\src\fpc-2.2.4
C:\Windows\system32>\Users\dayat\Downloads\FreePascal\Lazarus\PrepareLazarusForWinCE.bat c:\opt\app\lazarus

Read more

2010
01/30
CATEGORY
Tak Berkategori
TAGS





Write comment

Lazarus untuk WinCE

Lazarus adalah IDE FreePascal yang dapat digunakan untuk mempermudah pembuatan perangkat lunak GUI, termasuk untuk Windows Mobile atau WinCE.

Untuk mempersiapkan agar lazarus dapat menghasilkan file program untuk WinCE:

  1. Pastikan compiler arm-wince dan Read more
2010
01/29
CATEGORY
Learning
Posts
TAGS



Write comment

FreePascal untuk WinCE processor arm

Kita dapat membuat aplikasi pada Windows Mobile menggunakan freepascal dengan arsitektur WinCE dengan processor arm. Sebelumnya kita harus mempersiapkan terlebih dahulu:

Persiapan cross binutils

Download terlebih dahulu di ftp://ftp.freepascal.org/pub/fpc/contrib/cross/ cari arm-wince-binutils.zip. Extract ke suatu direktori, contohnya di C:\opt\App\binutils\arm

Read more

2010
01/28
CATEGORY
Learning
Posts
TAGS




Write comment

IIF function in PostgreSQL

Truly, this function not exists in PostgreSQL. But we can to create this by a function defined by you. Try to Execute this code to your postgresql:

CREATE OR REPLACE FUNCTION IIF(Expression Boolean, truePart text, falsePart text)RETURNS TEXT
AS $$
BEGIN
  IF Expression THEN
    RETURN truePart;
  ELSE
    RETURN falsePart;
  END IF;
END; $$
LANGUAGE PLpgSQL;

Read more

2009
12/29
CATEGORY
Posts
TAGS

Write comment

Exists Function

EXISTS function will check the query results. If the query procduces one or more records then the function will result TRUE value, otherwise will result FALSE value.

Example at PostgreSQL

sql_exists_func

Exists function can be implemented in stored procedure. Example in PL/pgSQL:

CREATE OR REPLACE FUNCTION emp_(empid integer)RETURNS VARCHAR
AS $$
DECLARE
  have_emp BOOLEAN;
BEGIN
  have_emp := EXISTS(SELECT 1 FROM PEGAWAI WHERE ID = empid);
  IF have_emp THEN
    RETURN 'The employee exists';
  ELSE
    RETURN 'The employee not exists';

  END IF;
END; $$
  LANGUAGE PLpgSQL;
2009
12/29
CATEGORY
Learning
Posts
Write comment

Compile Wine menggunakan Source Code

Download terlebih dahulu source code Wine di http://www.winehq.org/ dan simpanlah pada suatu folder/direktori. Sebagai contoh file yang saya download adalah wine-1.0.1.tar.bz2.

Saya menggunakan Fedora 10 dengan Development tools didalamnya seperti (GCC, dsb). Dan bukalah terminal pada menu Applications, System tools, Terminal.

Extract file wine-1.0.1.tar.bz2 ke direktori /tmp dengan mengetik pada terminal:
$ tar -jxvf wine-1.0.1.tar.bz2 -C /tmp

Masuk ke direktori hasil extract:
$ cd /tmp/wine-1.0.1

Menyiapkan kompilasi dengan script configure:
$ ./configure –with-x

configurewine

Jika hasil script configure diatas tidak ada kesalahan/error. Maka saatnya mengkompile:
$ make depend && make

winemakedepend

Tunggulah sampai proses kompilasi selesai. Ini mamakan waktu yang lama, tergantung dari kecepatan processor Anda.

Jika selesai compile (Wine build compolete), ketik “sudo make install” untuk memulai pemasangan:
$ sudo make install

Tunggulah beberapa saat sampai proses pemasangan selesai.

Jika proses pemasangan/instalasi selesai maka saatnya kita mencoba memasang sebuah aplikasi Windows pada sistem kita.

2009
12/27
CATEGORY
Posts
Solutions
TAGS

Write comment

Menjalankan Aplikasi Windows pada Linux

Sekarang lagi musim orang-orang pindah dari Sistem Operasi Windows ke Linux. Karena alasan harga license yang mahal. Kini Desktop Linux telah dijadikan alternatif. Yang merupakan Sistem Operasi mirip Unix.

Ada beberapa kendala saat pengguna Windows tidak dapat menjalankan Aplikasi yang dulu dijalankan pada Windows, kini tidak dapat dijalankan lagi di lingkungan Linux.

Wine adalah salah satu solusi untuk menjalankan Aplikasi Windows pada lingkungan Unix dan Linux. Wine adalah sebuah sistem yang mengemulasi lingkungan Windows kepada Aplikasi Windows, sehingga aplikasi-aplikasi yang dulunya dijalankan pada Windows, kini dapat dijalankan pada sistem operasi Unix dan Linux.

Mempersiapkan Wine pada Linux
Sebelum menggunakan aplikasi Windows pada Linux menggunakan emulator Wine, pastikan Wine sudah terpasang pada sistem Linux. Berikut bagaimana kita akan mempersiapkan dan memasang Wine pada Linux.

Pada terminal linux kita dapat memeriksa apakah Wine sudah terpasang denngan mengetik wine pada shell. Jika wine belum terpasang. Ada beberapa opsi memasang wine pada sistem yaitu:

Memasang aplikasi windows menggunakan wine

Mencoba menjalankan

2009
12/27
CATEGORY
Posts
Solutions
TAGS

Write comment

Install Fedora 10 on Virtual PC 2007

I has a GUI problem while installing Fedora 10 on Virtual PC 2007. After I searching, the problem caused by dept of VGA. Press Tab button in your keyboard, enter vga=788. This will add the vga kernel option.

BootingLinuxKernelVGA788

Press enter,

InstallingGUIVirtualPC

You should see that installation with GUI is ready now. After installation, you may add vga option in the linux loader such LILO or GRUP.

This is vga mode:

vga=normal —–80×25 text mode
vga=extended —–80×50 text mode
vga=ask
vga=785 —–640×480
vga=788 —–800×600
vga=791 —–1024×768

2009
12/05
CATEGORY
Posts
Write comment

Mengatur Title atau Caption JFrame

Pada NetBeans sudah tersedia untuk pengaturan Title Frame, atau biasa disebut Caption oleh programmer Windows. Klik obyek JFrame yang akan di set caption/title dan klik properties (biasanya berada pada sebelah kanan bawah). Jika panel properties tidak tampil, pilihlah menu Windows, dan pilih Properties. Cari properties title, dan isilah text yang Anda inginkan.

2009
11/18
CATEGORY
Posts
TAGS

Write comment
Locations of visitors to this page

Custumer Service