01-02-2010, 10:26 PM
[
قمت بإدراج
maskedit1.Visible:=true;
في حالة ما اذا تحولت قيمة checkbox الى الfalse بعدما كانت true
على العموم فكرتك رائعة والله ولا في الاحلام اتمنى اتعلم كيف اعملها وانك تعلمني افكر[/QUOTE]
كود :
[COLOR="Red"]begin
if checkbox1.checked=true then
begin
maskedit1.text:='';
maskedit1.Visible:=false;
end
else
if checkbox1.checked=false then
begin
if maskedit1.text='' then
[color=DeepSkyBlue] maskedit1.Visible:=true;[/color]
showmessage('write num-mag');
end;
adodataset1.filter:='num-mag ='''+d+'''and num-emp='''+F+'''and dat-tra='''+s+'''';
adodataset1.filtered:=True;
adodataset1.First;
end;
end;
end;
[/COLOR]maskedit1.Visible:=true;
في حالة ما اذا تحولت قيمة checkbox الى الfalse بعدما كانت true
على العموم فكرتك رائعة والله ولا في الاحلام اتمنى اتعلم كيف اعملها وانك تعلمني افكر[/QUOTE]

