Tuesday, November 19, 2013

Install Arabic di Windows 7

Mengenai cara install arabic di Windows 7 - Sebelumnya saya pernah memposting mengenai cara setting arabic pada pada Windows XP, maka pada kesempatan kali ini, kita akan membahas mengenai cara install/setting arabic language pada Windows 7.

Cara menginstall/setting arabic pada Windows 7 jauh lebih mudah dibandingkan dengan setting arabic pada Windows XP, mengapa demikian? karena menginstall arabic pada Windows 7 tidak memerlukan CD installer. Jadi, kemungkinan tidak akan ada judul posting yang seperti ini: Cara Install/Setting Arabic Pada Window 7 Tanpa CD Installer, karena memang tidak membutuhkannya.

Langkah-langkah installasi:

  • Klik Tombol Start >> Control Panel >> Clock, Language and Region >> Change keyboards or other input methods
  • Pada Dialog window Text Services and Input Languages, klik tombol Add
  • Pada window Add Input Language, pilih Arabic (Saudi Arabia) Klik tanda + pada Arabic (Saudi Arabia)  >>  tanda + Keyboard >> pilih Arabic (101)  >> OK.
  • Sampai disini, proses intallasi belum selesai, selanjutnya klik tombol Key Settings >> Change Key Sequence... >> Switch input languages >> CTRL + SHIFT, point yang terakhir ini maksudnya: apabila Anda ingin berpindah dari latin ke arab maka tekan CTRL + SHIFT (kanan) dan apabila Anda ingin berpindah dari Arab ke Latin tekan CTRL + SHIFT (kiri). Tentu saja ini akan sangat memudahkan sekali pada saat kita mengetik tulisan campuran antara Latin dan Arab.
Untuk lebih jelasnya, Anda bisa melihat video cara install arabic pada Windows 7:



Demikian mengenai cara install arabic pada Windows 7, Semoga bermanfaat.
READ MORE - Install Arabic di Windows 7

Friday, November 1, 2013

VB6 Trik - Mengukur Dimensi String Tanpa Fungsi API

Menjelaskan mengenai cara mengukur dimensi string yang menggunakan objek font tertentu tanpa menggunakan fungsi API.

Untuk berbagai keperluan, terkadang kita membutuhkan sebuah prosedure untuk mengukur dimensi sebuah string. Di samping dengan menggunakan fungsi API GetTextExtentPoint32, kitapun dapat mengukurnya dengan sebuah trik yang sederhana, di bawah ini adalah contohnya:

Option Explicit

Private Type hwFONT
Height As Integer
Width As Integer
End Type

Private Function GetWidthHeight(LabelCaption As String) As hwFONT
Dim lbl As Label, hwF As hwFONT
Set lbl = Controls.Add("VB.Label", "lblTestWidthHeight")
With lbl
.Caption = LabelCaption
.AutoSize = True
.Refresh
End With
hwF.Width = lbl.Width
hwF.Height = lbl.Height
GetWidthHeight = hwF
Controls.Remove "lblTestWidthHeight"
End Function

Private Function GetFontWidthHeight(LabelCaption As String, _
Optional FontName As String = "MS Sans Serif", _
Optional FontSize As String = 8) As hwFONT
Dim lbl As Label, hwF As hwFONT
Set lbl = Controls.Add("VB.Label", "lblTestWidthHeight")
With lbl
.FontName = FontName
.FontSize = FontSize
.Caption = LabelCaption
.AutoSize = True
.Refresh
End With
hwF.Width = lbl.Width
hwF.Height = lbl.Height
GetFontWidthHeight = hwF
Controls.Remove "lblTestWidthHeight"
End Function

Private Function GetFontObjectWH(LabelCaption As String, fntAny As StdFont) As hwFONT
Dim lbl As Label, hwF As hwFONT
Set lbl = Controls.Add("VB.Label", "lblTestWidthHeight")
With lbl
.Caption = LabelCaption
.AutoSize = True
Set .Font = fntAny
.Refresh
End With
hwF.Width = lbl.Width
hwF.Height = lbl.Height
GetFontObjectWH = hwF
Controls.Remove "lblTestWidthHeight"
End Function

Private Sub cmdTest1_Click()
Dim hwF As hwFONT
hwF = GetWidthHeight("Test")
List1.AddItem "Test"
Shape1.Width = hwF.Width
Picture1.Cls
Picture1.Print "Height: " & hwF.Height & vbCrLf & "Widht: " & hwF.Width
End Sub

Private Sub cmdTest3_Click()
Dim fntList As StdFont
Dim hwF As hwFONT
Set fntList = List1.Font
Dim strString As String
strString = "Test Font object"
List1.AddItem strString
hwF = GetFontObjectWH(strString, fntList)
Shape1.Width = hwF.Width
Picture1.Cls
Picture1.Print "Height: " & hwF.Height & vbCrLf & "Widht: " & hwF.Width
End Sub

Private Sub cmdTest2_Click()
Dim hwF As hwFONT
hwF = GetFontWidthHeight("Just Test")
List1.AddItem "Just Test"
Shape1.Width = hwF.Width
Picture1.Cls
Picture1.Print "Height: " & hwF.Height & vbCrLf & "Widht: " & hwF.Width
End Sub
Selanjutnya, dari contoh-contoh di atas yang akan kita gunakan untuk berbagai keperluan adalah:
Private Type hwFONT
Height As Integer
Width As Integer
End Type

Private Function GetFontObjectWH(LabelCaption As String, fntAny As StdFont) As hwFONT
Dim lbl As Label, hwF As hwFONT
Set lbl = Controls.Add("VB.Label", "lblTestWidthHeight")
With lbl
.Caption = LabelCaption
.AutoSize = True
Set .Font = fntAny
.Refresh
End With
hwF.Width = lbl.Width
hwF.Height = lbl.Height
GetFontObjectWH = hwF
Controls.Remove "lblTestWidthHeight"
End Function

Download project: String dimension (font height and width)

READ MORE - VB6 Trik - Mengukur Dimensi String Tanpa Fungsi API

Tuesday, October 1, 2013

Menghapus Virus Shortcut - Cara Termudah

Mengenai cara termudah menghapus virus shortcut/copy of shortcut/ramnit/recycler - Sebelumnya saya pernah memposting bagaimana cara menghapus virus copy of shortcut secara manual klik di sini. Pada saat itu, cara tersebut terbukti efektif, yakni sebelum virus copy of shortcut dapat menginfeksi file *.exe, *.dll, .html seperti sekarang ini. Lalu sekarang bagaimana?

Langkah-langkah menghapus virus ramnit

  • Download ramnit killer (PCMAV Express for Ramnit) klik di sini
  • Tutup seluruh aplikasi yang sedang berjalan
  • Putuskan koneksi internet (tidak boleh ada koneksi internet)
  • Jalankan dialog run dengan menekan Win + R atau klik Start >> Run
  • Ketik 'msconfig' (tanpa menggunakan tanda petik)
  • Pilih tab Startup >> Disable All >> OK seperti gambar di bawah:
Windows MSConfig
Gambar: Mendisable seluruh program pada startup

  • Restart komputer
  • Jalankan PCMAV Express for Ramnit
  • Biarkan ia bekerja hingga selesai.
  • Setelah selesai, Anda dapat meng-enable-kan kembali aplikasi-aplikasi yang berjalan pada startup yang sebelumnya Anda disablekan.
Win + R
Gambar: Menekan tombol Win + R


PCMAV Express untuk menghapus virus Ramnit - Copy Of Shortcut - Recycler
Gambar: PCMAV Express untuk menghapus virus Ramnit - Copy Of Shortcut - Recycler


Demikian mengenai cara menghapus virus copy of shortcut dengan mudah. Semoga bermanfaat.

Keywords: cara, menghilangkan, virus, copy, of, shortcut, menghapus, +, recycler, (ramnit), mudah, mengatasi, ramnit, manual, dan, secara, bagaimana, shorcut, pcmav, express, for, ramnit.shortcut, membasmi, membersihkan, uninstall, software, hapus, killer, aplikasi, untuk, ramnit,shortcut,recycler, hilangkan, pada, windows, 7, basmi, file, to, membuang, membunuh, download, 1, 2, 3, 4, di, bersihkan, penghapus.

READ MORE - Menghapus Virus Shortcut - Cara Termudah

Kamus Bahasa Arab v3.0 | Download

Alhamdulillah Kamus Bahasa Arab v3.0 telah selesai. Kamus Bahasa Arab v3.0 merupakan kelanjutan Kamus Bahasa Arab v2.0.1

Sebelum proses instalasi Software Kamus Bahasa Arab v3.0, pastikan bahwa windows Anda mendukung penulisan arab penuh. Mengenai tatacara setting arabic pada windows XP klik link disamping Cara Setting Arabic Pada Windows XP.

Download: Kamus Bahasa Arab v3.0

Perhatian:
Untuk kenyamanan Anda, scan terlebih dahulu menggunakan Anti Virus sebelum melakukan proses instalasi.

Mengenai hal-hal yang berhubungan dengan kamus bisa Anda klik disini.
 Keywords: download, kamus, bahasa, arab, indonesia, untuk, windows, 7, xp, 8, v3.0, free, offline, software, v3, online, aplikasi
READ MORE - Kamus Bahasa Arab v3.0 | Download