Paska pengunduran diri Steve Jobs, desain produk Apple kini berada di tangan Jonathan Ive. Lalu siapakah Jonathan Ive ? Apa jabatannya di Apple Inc. ?

Lahir di Chingford dengan nama Jonathan Paul Ive, pada bulan Febuari 1967. Jonathan yang akrab dipanggil Jony ini adalah seorang berdarah Inggris dan seorang desainer handal. Sekarang dia menduduki jabatan sebagai Senior Senior Vice President of Industrial Design.

Bakat Jony nampaknya diturunkan dari ayahnya, dimana ayahnya adalah seorang guru desain sebelum bertukar pekerjaan menjadi seorang inspektur atau pengawas sekolah. Dan bakat ini semakin terlihat ketika dia mendaftarkan diri di sekolah Walton (Walton High School). Gurunya melihat dia sangat terampil dalam pelajaran desain.

Jonathan Paul Ive bertemu dengan calon istrinya, Heather Pegg, yang seorang anak dari salah satu inspektur sekolah lokal, satu tahun dibawah Ive dan mereka menikah pada tahun 1987.

Jony adalah lulusan Bachelor of Arts dan doktor kehormatan dari politeknik Newcastle, Inggris (sekarang Universitas Northumbria). Dimana pada tahun 2003, ia memenangkan perlombaan desain yang diselenggaraan oleh Design Museum (designmuseum.org).

Sebelum bergabung dengan Apple, Apple sendiri adalah client dari Tangerine, sebuah perusahaan konsultan desain tempat Jony berkreasi. Kemudian pada tahun 1992, Apple menawarkan pekerjaan kepadanya di Cupertino, California. Walaupun di awal-awal dia bergabung, Jony mengaku sangat tertekan dan kehilangan tujuan. Sampai kedatangan kembali Steve Jobs ke Apple sekitar tahun 1997 dan melakukan beberapa perubahan. Disinilah berawal kedekatan Jony dengan Steve Jobs.

Image source : nonlocally.wordpress.com

Berikut kodenya :
Server dengan IXR (xmlrpc-server.php) :

Client dengan IXR (xmlrpc-client-ixr.php) :

Client tanpa IXR (xmlrpc-client-nonixr.php) :

Sehingga, ketika kita mengakses http://localhost/xmlrpc/xmlrpc-client-ixr.php atau http://localhost/xmlrpc/xmlrpc-client-nonixr.php akan sama-sama menghasilkan output :

Di Lazarus, kita bisa menggunakan Synapse library yang non visual tapi powerfull.

Berikut contoh kode penggunaannya :

Hasilnya dapat kita parse menggunakan TXMLDocument. Selamat mencoba.

Kenapa bukan CV. Niwa Karya ? CV. Data Mediatama memang didirikan untuk lebih kepada penanganan usaha mandiri tanpa banyak terlibat ke project pemerintahan seperti CV. Niwa Karya. Walaupun secara manajemen dan struktural, para personelnya hampir sama.

Adapun PalangkaRaya.net atau Pnet kedepannya menginformasikan berita-berita lokal di Palangka Raya, sedangkan forumnya sendiri adalah bagian fasilitas pelengkap. Portal dan forum selain dapat di akses menggunakan PC biasa, juga dapat diakses dengan nyaman dan minimalis di pocket handled yang berbasis Java, Symbian, Android, Blackberry ataupun gadget non-PC lainnya.

PalangkaRaya.net di facebook beralamat di http://www.facebook.com/palangkarayanet dan twitter di http://twitter.com/#!/PalangkaRayaNet. Berikut adalah screenshot dari PalangkaRaya.net dan forumnya.

Tentu dapat kita lakukan, dengan catatan, printer telah terinstall dengan baik di komputer kita. Baik itu local printer ataupun network printer.

uses
...Printers...

...
  private
    { private declarations }
  public
    { public declarations }
  SelectPrinter : Integer;
  end;

var
  Form1: TForm1;

implementation
...

procedure TForm1.FormCreate(Sender: TObject);
begin
  ComboBox1.Items.AddStrings(Printer.Printers);
  ComboBox1.Text := Printer.Printers[Printer.PrinterIndex];
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  SelectPrinter := Combobox1.ItemIndex;
  Printer.PrinterIndex := SelectPrinter;
  Printer.Title := 'Test boss';
  Printer.BeginDoc;
  Printer.Canvas.Font.Size := 12;
  Printer.Canvas.TextOut(100,  50, 'Text string1');
  Printer.Canvas.TextOut(100, 150, 'Text string2');
  Printer.EndDoc;
end;

Berikut adalah isi dari sebuah file “config.ini” dimana nantinya kita akan mencari section dengan kata kunci “device” dan menampilkannya di TListBox.

[general]
info=mypc

[device1]
vendor=intel

[device2]
vendor=panasonic

[device3]
vendor=samsung

[device4]
vendor=sony

[device8372]
vendor=huawei

Berhubung saya tidak menemukan library regular expression untuk Lazarus, maka kode dibawah ini agak sedikit “aneh” dan “dirty”. Berikut adalah kode didalam Lazarus yang bisa kita gunakan :

uses
....
Inifiles, StrUtils, ....
....
procedure TForm1.Button1Click(Sender: TObject);
var
  ATStrings : TStringList;
  i : integer;
  SearchSection : string;
begin
  MyIniFile := TIniFile.Create(ExtractFilePath(Application.EXEName) + 'config.ini');
  ATStrings := TStringList.Create;
  MyIniFile.ReadSections(ATStrings);
  SearchSection := 'device';
  Listbox1.Clear;
  for i := 0 to ATStrings.Count -1 do
    begin
      if ((Copy(Lowercase(ATStrings[i]), 1, Length(ATStrings.Strings[i]))) = 
         SearchSection + Copy(Lowercase(ATStrings.Strings[i]),
         (Length(Trim(SearchSection))+1),
         (Length(ATStrings.Strings[i])-(Length(Trim(SearchSection)))))) then
      ListBox1.Items.Add(ATStrings.Strings[i]);
    end;
    ATStrings.Free;
    MyIniFile.Free;
end;
....

Sehingga nantinya akan menghasilkan :

device1
device2
device3
device4
device8732

SELECT
  inbox.id, 
  inbox.ReceivingDateTime,  
  inbox.SenderNumber,
  CAST(pbk.name AS CHAR(50)),
  CASE
    WHEN LENGTH(inbox.TextDecoded) > 50
	   THEN CONCAT(CAST(inbox.TextDecoded AS CHAR(50)),"...")
	   ELSE CAST(inbox.TextDecoded AS CHAR(50))
  END AS TextMessages
FROM inbox LEFT OUTER JOIN pbk ON inbox.SenderNumber = pbk.Number ORDER BY inbox.id DESC;

Nantinya, hasil yang didapat adalah, jika karakter lebih dari 50 karakter, akan menampilkan tanda “…” (dotted) di akhir kalimat.

Berikut adalah daftar detail yang bisa dilihat menggunakan MediaInfo :

• Umum : Judul, pembuat, direktor, album, nomor trek, tanggal, durasi…
• Video: codec, aspect, fps, bitrate…
• Audio: codec, sample rate, channels, language, bitrate…
• Subtitel: Bahasa dari subtitel
• Bab (chapter): Nama chapter, nomor chapter

Format apa saja yang didukung MediaInfo :

• Video: MKV, OGM, AVI, DivX, WMV, QuickTime, Real, MPEG-1, MPEG-2, MPEG-4, DVD (VOB)… (Codecs: DivX, XviD, MSMPEG4, ASP, H.264, AVC…)
• Audio: OGG, MP3, WAV, RA, AC3, DTS, AAC, M4A, AU, AIFF…
• Subtitel:: SRT, SSA, ASS, SAMI…

Tambahan kelebihan lain :

• Membaca pelbagai format video dan audio
• Berbagai metoda berbeda untuk melihat informasi (teks, sheet, tree, HTML)
• Anda bisa mengustomisasi tampilan
• Ekspor tampilan dalam CSV, HTML…
• Antarmuka grafis, baris perintah maupun DLL
• Integrasi dengan MS-Windows shell (geser dan jatuhkan, menu konteks)
• Internasionalisasi : Berbagai bahasa dalam berbagai versi di sistem Anda

Untuk selengkapnya silahkan Anda berkunjung ke :

• http://mediainfo.sourceforge.net/

Akhir-akhir ini, pelanggan seperti saya seringkali menggunakan fasilitas chat yang telah disediakan, karena pelanggan merasa dirinya disambut dengan baik dan mendapatkan respon lebih cepat tanpa harus menunggu terlalu lama seperti sms atau email (real time) walaupun waktunya bisa saja terbatas atau dibatasi karena jam kerja.

Nah, disisi penyedia atau produsen, hal ini sangat membantu untuk mendapatkan kesan balik (feedback) dari pelanggan dan kecepatan pemesanan (order) dari pelanggan. Siapa yang tidak senang ketika pelanggan melihat-lihat dan merasa tertarik, mereka akan langsung melakukan pemesanan barang atau jasa yang ditawarkan baik melalui aplikasi pemesanan (order form) atau melalui fasilitas chat seperti yang dibahas diawal.

Khusus untuk chat, adanya layanan messenger seperti YM dan GTalk memang membantu. Akan tetapi ada beberapa hal yang mungkin saja tidak disediakan oleh mereka namun bisa didapatkan dari “Live Support” script berbasis web. Namun hal itu kembali lagi kepada pihak penyedia barang dan jasa atau produsen untuk menghadirkan layanan chat berbasis web selain menggunakan fasilitas “messenger”. Berikut adalah beberapa daftar Live Support script yang bisa Anda gunakan secara bebas dan gratis.

• Crafty Syntax Live Help : http://www.craftysyntax.com/

• Help Center Live : http://www.helpcenterlive.com/

• LiveZilla : http://www.livezilla.net/home/en/

Selamat mencoba!

PC tablet yang ditampilkan oleh CEO Microsoft ini sendiri belum diketahui namanya. “Hampir sama portabel sebagai telepon, tetapi kuat sebagai sebuah PC yang (mampu) menjalankan Windows 7,” kata Ballmer ketika ia memegang layar datar ke arah penonton. Ballmer juga menyebutkan inisiatif seperti “Project Natal,” yang seharusnya mengubah pengguna menjadi “pengontrol” untuk Xbox 360.

Tidak lupa pula, dalam ajang ini Steve Ballmer mempromosikan produk mesin pencari milik Microsoft, Bing.

Kita tunggu saja, apakah PC tablet yang dibundel dengan Windows 7 pada tahun 2010 ini akan mampu mengalahkan produsen lainnya seperti Apple dalam bidang PC tablet.

Untuk selengkapnya silahkan Anda berkunjung ke :

• http://www.eweek.com/c/a/Windows/Microsoft-Pushes-Tablet-PCs-Windows-7-at-CES-But-Not-Mobile-860893/?kc=rss
• http://www.pcworld.com/article/165354/apple_tablet_coming_in_2010.html

Oke, sekarang perhatikan gambar berikut.

Nah, dari gambar tersebut, mari kita coba untuk membuatnya. Berikut adalah langkah-langkahnya :

1. Buat sebuah project baru di Lazarus IDE.

2. Tambahkan sebuah TLabel komponen dan sebuah TComboBox komponen diatas Form1 sebagai lembar kerja. Sehingga otomatis masing-masing akan diberi nama ComboBox1 dan Label1.

3. Dari Object Inspector, pilih property milik TComboBox yang bernama ComboBox1 dan set propertiesnya “Read Only” dengan True. Dan dari Events milik ComboBox1, lakukan klik 2 kali atau dobel klik di area kosong sebelah kanan “OnChange” sehingga akan ditampilkan lembar source editor. Tambahkan kode kedalamnya :

Label1.Font.Name := ComboBox1.Items.Strings[(ComboBox1.Items.IndexOf(ComboBox1.Text))];

Dimana dengan kode diatas, untuk merubah huruf di TLabel (Label1), kita memerlukan perubahan properties nama huruf (Font Name) milik Label1 yang didapat dari list atau daftar huruf di TComboBox (ComboBox1).

4. Dari Object Inspector kembali, pilih property Form1 (TForm), kemudian pilih Events dan lakukan dobel klik di area kosong sebelah kanan “OnCreate” sehingga kita akan kembali ke lembar source editor, lalu tambahkan kode kedalamnya :

ComboBox1.Items.AddStrings(Screen.Fonts);

Dimana dengan kode diatas akan memuat semua huruf yang terdapat didalam operating system (OS), kedalam TComboBox (ComboBox1) yang mana setiap huruf akan berbeda antara Windows, Linux atau MacOS.

5. Selesai, tekan F9 atau klik menu Run untuk melihat hasil akhirnya.

Kode selengkapnya adalah sebagai berikut :

unit Unit1;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
StdCtrls;

type

{ TForm1 }

TForm1 = class(TForm)
ComboBox1: TComboBox;
Label1: TLabel;
procedure ComboBox1Change(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ private declarations }
public
{ public declarations }
end;

var
Form1: TForm1;

implementation

{ TForm1 }

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
Label1.Font.Name := ComboBox1.Items.Strings[(ComboBox1.Items.IndexOf(ComboBox1.Text))];
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
ComboBox1.Items.AddStrings(Screen.Fonts);
end;

initialization
{$I unit1.lrs}

end.

Download :