From: "Aksan Kurdin aksan.kurdin@gmail.com [belajar-access]" <belajar-access@yahoogroups.com>
Date: Feb 20, 2015 1:58 AM
Subject: Re: [belajar-access] penambahan coordinate di grid [1 Attachment]
To: <belajar-access@yahoogroups.com>
Cc:
memungkinkan , dan semua menjadi mudah andaikan form access mendukung menggambar garis di atas nya.
saya coba browsing untuk mencari cara menggambar garis di atas form programmatically, ketemu beberapa cara dengan memanggil windows API function, atau menambahkan control line di atas form design.
sementara ini masih ngoprek, dan saya eksperimen dengan cara kedua, menambah control garis ke atas form yg di create dynamic by code.
nantinya caranya penuh tricky!
set form ke design mode,
tambahkan kontrol garis,
set form kembali ke view mode.
berikut contoh sub yang saya temui dan sedang di utak atik:
Sub NewControls()
Dim frm As Form
Dim ctlLabel As Control, ctlText As Control, ctlLine As Control
Dim intDataX As Integer, intDataY As Integer
Dim intLabelX As Integer, intLabelY As Integer
' Create new form with Orders table as its record source.
Set frm = CreateForm
'frm.RecordSource = "Orders"
' Set positioning values for new controls.
intLabelX = 100
intLabelY = 100
intDataX = 1000
intDataY = 100
' Create unbound default-size text box in detail section.
' Set ctlText = CreateControl(frm.Name, acTextBox, , "", "", _
intDataX, intDataY)
' Create child label control for text box.
' Set ctlLabel = CreateControl(frm.Name, acLabel, , _
ctlText.Name, "NewLabel", intLabelX, intLabelY)
' Restore form.
Dim i As Integer
For i = 1 To 10
Set ctlLine = CreateControl(frm.Name, acLine, , "", "", intDataX + 300 * i, intDataY, 1500, 1500)
'ctlLine.LineSlant = "\"
ctlLine.BorderColor = RGB(0, 0, 0)
ctlLine.Name = "Line" & i
Set ctlLine = Nothing
Next i
DoCmd.Restore
DoCmd.OpenForm frm.Name, acNormal
End Sub
dan ini hasilnya, bisa create 10 line di atas form:
regards
a.k.
Dear Pak Aksan
Hendak nya demikian Pak , titik koordinate x dan y persis di jatuh pada titik garis atau di dalam kotak antara garis sesuai denga nilai harga xy nya , dan z nya hanya pelengkap saja kalau kita pakai 2 demensi .Gimana Pak apakah access memungkinkan atau bisa seperti yg di inginkan ?
demikian terimakasih
salam, Ira
On Thursday, February 19, 2015 9:54 PM, "Aksan Kurdin aksan.kurdin@gmail.com [belajar-access]" <belajar-access@yahoogroups.com> wrote:
Ira ldotel hendak membuat tampilan tiga dimensi, kumpulan garis dari tabel koordinat, dengan latar grid sesuai skala yang diatur dalam tabel grid. Begitu bukan ?
Pertama kali menggambar bidang nya dulu, lalu hendak meletakkan titik dengan koordinat 3 dimensi, tetapi di bidang 2 dimensi.
berarti yang bisa digambar nantinya hanya letak x dan y nya saja. sedang ketinggian koordinat z tidak terlihat.
bukan begitu bu Ira ?
a.k.
On 1/30/2015 11:42 PM, Ira Idotel iraidotel@yahoo.com [belajar-access] wrote:
Dear Pak Bambang,
grid terbentuk pada saat form di klik
dan bagaimana kalau di tambahkan dengan 3 point coordinateyang ada pada tabel kedua
demikian
salam, Ira Borneo
On Friday, January 30, 2015 10:26 PM, "Bambang Hartoko bambanghartoko@yahoo.com [belajar-access]" <belajar-access@yahoogroups.com> wrote:
saya sudah coba pelajari, tapi masih belum paham hubungan antara kedua tabel tersebut (hubungan coord xyz dengan bigsize dan cut size), mungkin bisa dikirim informasi yang lebih detail, atau tampilan visual mapping
Salam,
Bambang Hartoko
On Wednesday, January 28, 2015 7:48 AM, "Ira Idotel iraidotel@yahoo.com [belajar-access]" <belajar-access@yahoogroups.com> wrote:
[Attachment(s) from Ira Idotel iraidotel@yahoo.com [belajar-access] included below]Dear Pakar dan suhu
Dh,terlampir saya sertakan grid.mdb
yang mana isi nya ada 2 tabel
tabel pertama untuk pembuatan Grid dengan scaletabel kedua point coordinate
bagaimana caranya untuk kedua nya bisa jadi satu tampilan ?
mungkin ada yang pernah buat , mohon pencerahan nya
termakasih
Salam, Ira Borneo
Attachment(s) from Aksan Kurdin aksan.kurdin@gmail.com [belajar-access] | View attachments on the web
1 of 1 Photo(s)
| Reply via web post | • | Reply to sender | • | Reply to group | • | Start a New Topic | • | Messages in this topic (8) |
