23-05-2013, 02:36 PM
السلام عليكم
المشكلة هي كيف يمكنني ادخال المعلومات اذا كان كل tabsheet يوجد فيه مكون memo1 كيف يمكنني ادخال المعلومات ل memo من خارج ال frame
توضيح السؤال اكثر
لدي edit txt في الصفحة الرئيسية وانقل التكست الى tabsheet الموجودة داخل ال frame
كود :
var
ANewSheet: TTabSheet;
ANewFrame: TFrame2;
begin
ANewSheet := TTabSheet.Create(Self);
ANewSheet.Name := edit1.Text;
ANewSheet.PageControl := PageControl1;
FrammeIdx := FrammeIdx + 1;
ANewFrame := TFrame2.Create(Self);
ANewFrame.Name := edit1.Text+ IntToStr(FrammeIdx);
ANewFrame.Edit1.Text := edit1.Text;
ANewFrame.Parent := ANewSheet;المشكلة هي كيف يمكنني ادخال المعلومات اذا كان كل tabsheet يوجد فيه مكون memo1 كيف يمكنني ادخال المعلومات ل memo من خارج ال frame
توضيح السؤال اكثر
لدي edit txt في الصفحة الرئيسية وانقل التكست الى tabsheet الموجودة داخل ال frame