Delphi 7 kullanıyorum. Çözmekte zorlandığım sorun farklı programın formunun konumunu labellara aktaramıyorum. Programın kendi formlarının aktarımı oldukça basit ancak örneğin bir not defteri açıldığında o forma ait konumu aktaramıyorum.
Kendi formun konumu için kod:
Kendi formun konumu için kod:
Kod:
procedure TForm1.Timer1Timer(Sender: TObject);var
a,b:integer;
begin
b:=form2.top;
a:=form2.left;
label1.caption:=inttostr(a);
label2.caption:=inttostr(b);