-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathDetailAdvertiserment.dfm
115 lines (115 loc) · 2.32 KB
/
DetailAdvertiserment.dfm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
object frDetailTransaction: TfrDetailTransaction
Left = 139
Top = 138
BorderStyle = bsDialog
Caption = 'Detail Transaksi'
ClientHeight = 488
ClientWidth = 863
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnClose = FormClose
OnCreate = FormCreate
DesignSize = (
863
488)
PixelsPerInch = 96
TextHeight = 13
object bEdit_Advt: TSpeedButton
Left = 8
Top = 8
Width = 177
Height = 33
Caption = 'Edit Posisi / '#13#10'Judul Iklan'
Flat = True
OnClick = bEdit_AdvtClick
end
object lbl1: TLabel
Left = 8
Top = 464
Width = 242
Height = 13
Anchors = [akLeft, akBottom]
Caption = 'Double Click untuk melakukan pengeditan'
end
object lvAdvertisment: TListView
Left = 8
Top = 48
Width = 848
Height = 406
Anchors = [akLeft, akTop, akRight, akBottom]
Columns = <
item
Caption = 'No Advertising'
Width = 80
end
item
Caption = 'Kode Iklan'
Width = 80
end
item
Caption = 'Jenis Iklan'
Width = 100
end
item
Caption = 'Isi Iklan'
Width = 250
end
item
Caption = 'Edisi'
end
item
Caption = 'Halaman'
end
item
Caption = 'Kolom Pertama'
end
item
Caption = 'Jml Kolom'
end
item
Caption = 'Posisi Pertama'
end
item
Caption = 'Tinggi Kolom'
end
item
Caption = 'Harga Jual'
end
item
Caption = 'Diskon'
end
item
Caption = 'Total Harga'
Width = 100
end>
ReadOnly = True
RowSelect = True
TabOrder = 2
ViewStyle = vsReport
OnDblClick = lvAdvertismentDblClick
end
object cbCategory: TComboBox
Left = 603
Top = 16
Width = 257
Height = 21
Anchors = [akTop, akRight]
ItemHeight = 13
TabOrder = 1
end
object tSearch: TEdit
Left = 200
Top = 16
Width = 388
Height = 21
Anchors = [akLeft, akTop, akRight]
TabOrder = 0
OnChange = tSearchChange
end
end