How to display vendor detail from vendor code in report

Vendrs.RESET;
Vendrs.SETRANGE(Vendrs.“No.”,“Vendor No.”);
IF Vendrs.FIND(’-’) THEN BEGIN
vend:=Vendrs.“No.”;
name:=Vendrs.Name;
add:=Vendrs.Address;

END;