26-07-2013, 01:16 AM
الحمد لله وجدت الحل وهوا كالتالي
كود :
procedure Tfcity.CountryChange(Sender: TObject);
begin
inherited;
data.SP_City.Parameters.ParamByName('@countryname').Value :=(country.Text) ;
Thelper.fillcombobox(city,data.SP_City,'city_name');
end;
