Dll'den Form üzerindeki nesnelere ulaşma

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
sunye
Üye
Mesajlar: 105
Kayıt: 24 Ağu 2004 04:49
Konum: izmir

Dll'den Form üzerindeki nesnelere ulaşma

Mesaj gönderen sunye »

Selamlar,

Form şeklinde çalıştırdığım dll'lerden ana form üzerindeki nesnelerin eventlerine nasıl erişebilirim Örnek olarak(button1.click). Forumda bu konu hakkında bilgi göremedim yada olanları ben kavrayamadım.

İlave : Ayrıca ana form üzerindeki global değişkenlere yeni değer atama yapılabilir mi ?

yardımlarınız için şimdiden teşekkürler.
Bildiğim tek şey, hiç bir şey bilmediğim.
ikra
Üye
Mesajlar: 901
Kayıt: 28 Nis 2005 01:26
Konum: Simdilik Topragin Üstü

Re: Dll'den Form üzerindeki nesnelere ulaşma

Mesaj gönderen ikra »

Buton1'in onClick eventini formu olusturdugun DLL Fonksyonuna parametre olarak göndermeyi denedin mi?
kıdemsiz üye
Kullanıcı avatarı
sunye
Üye
Mesajlar: 105
Kayıt: 24 Ağu 2004 04:49
Konum: izmir

Re: Dll'den Form üzerindeki nesnelere ulaşma

Mesaj gönderen sunye »

Söylediğiniz yöntemi bilmediğim için, daha doğrusu ilk defa dll ile çalıştığımı için pek bir bilgim yok.
örnek olarak yazabilir misiniz?
Bildiğim tek şey, hiç bir şey bilmediğim.
ikra
Üye
Mesajlar: 901
Kayıt: 28 Nis 2005 01:26
Konum: Simdilik Topragin Üstü

Re: Dll'den Form üzerindeki nesnelere ulaşma

Mesaj gönderen ikra »

Kod: Tümünü seç

function FormOlustur(App: TApplication; AEvent: Pointer): TForm; stdcall;

procedure TForm1.Button1Click(Sender: TObject);
var
  E: TNotifyEvent;
  F: TForm;
begin
  E := Button2.OnClick;
  F := FormOlustur(Application, @E);
end;
DLL icinde ise

Kod: Tümünü seç

function FormOlustur(App: TApplication; AEvent: Pointer): TForm;
var
  E: TNotifyEvent;
begin
  E := nil;
  Result := TForm.Create(App);
  if AEvent <> nil then
    E := TNotifyEvent(AEvent);
  if Assigned(E) then E(nil);
end;
is yerindeyim, deneme imkanim yok. ama mantiken calismasi gerekiyor.
kıdemsiz üye
Cevapla