Неполучается с Data Report

[Ivan1]

Помогите пожалуйста кто нибуть у меня возникли трудности
добовляю в проект объект Data Report
начинаю с ним работать все вроде нормально
но в заголовок отчета (Report Header) немогу никак добавить компоненту которая назы вается Text
например

Заявка №
а как присвоить номер заявки которую я беру из базы данных
я так и не знаю
или метку положить и тогда как обращаться к ее свойству label1.caption.
И еще на форму ложу кнопку пишу код

Private Sub Command4_Click()
'********Выбор данных**************
Dim Number, lblnumber As Integer
OpenDB
RST1.MoveFirst
Rst2.MoveFirst
'lblnumber = Label11.Caption - 1
lblnumber = Text1.Text
Do While Rst2.EOF = False
Rst2.Delete
Rst2.MoveNext
Loop

Do While RST1.EOF = False
Number = RST1!number_z
If Number = lblnumber Then
Rst2.AddNew
Rst2!number_z = RST1!number_z
Rst2!Data = RST1!Data
Rst2!Name_Otd = RST1!Name_Otd
Rst2!Name_mate = Rst2!Name_mate
Rst2!ed_izm = RST1!ed_izm
Rst2!kol_vo = RST1!kol_vo
Rst2!stoimost = RST1!stoimost
Rst2!Symma = RST1!Symma
Rst2!Itoz_z = RST1!Itoz_z
Rst2!vipolnenie = RST1!vipolnenie
Rst2.Update
End If
RST1.MoveNext
Loop
'**********************************
DataReport1.Show
End Sub
Вроде все работает но только
объект datareport1 открывается почемуто со старыми данными
которые были в базе данных до запуска программы.
Спосибо

[Alex404]

1. Чтоб данные были надо datasource прописать:
Set DataReport1.DataSource = rst1

2. C Caption свойством у Datareport-а не так просто как у формы. Надо примерно так:
DataReport1.Sections("Section3").Controls("Label8").Caption = "тратата"

3. Есть штучка значительно удобнее и интереснее чем деревянный датарепорт. ActiveReport называется.