كيفية اجبار الفورم على الظهور مرة واحدة فقط

[kachwahed]

وعليكم السلام ورحمة الله وبركاته
النماذج (Forms) في دلفي تأخذ قيمة False للخاصية Visible عند إنشائها
لإظهار نافتين معا إضبط خاصية Visible على True
---
في مثالك استخدمت FormActivate كحدث لإظهار النموذج الثاني
وهو ما تسبب في ظهور النموذج مرة أخرى عند إعادة حصوله على التفعيل Active
الأفضل أن تستخدم الحدث OnShow...
إذا كنت مصرا على إظهار نموذج واحد، جرب:

PHP كود :

procedure TForm1.FormActivate(Sender: TObject);
begin
  try
    Creatfrm2();
  except
    exit;
  end;
  OnActivate := nil;//مرة واحدة
end; 


بنفس الطريقة يمكنك استخدام متغير Boolean أو Tag والتحقق منه...
بالتوفيق.