BuscaCEP เป็นห้องสมุดสำหรับการให้คำปรึกษาเกี่ยวกับที่อยู่ออนไลน์ ช่วยให้ค้นหาตาม CEP (รหัสที่อยู่ทางไปรษณีย์) หรือตามถนน (UF, ท้องที่ และถนน)
BuscaCEP ถูกนำมาใช้ในภาษา Delphi
โดยใช้แนวคิดอินเทอร์เฟซที่คล่องแคล่วเพื่อเป็นแนวทางในการใช้ไลบรารี ซึ่งพัฒนาขึ้นเพื่อให้ใช้งานได้จริงและมีประสิทธิภาพ BuscaCEP ได้รวมผู้เล่นหลักในตลาดเข้าด้วยกัน เช่น Correios, ViaCEP, BrasilAPI และอื่นๆ อีกมากมาย
ไลบรารีนี้เหมาะสำหรับนักพัฒนา Delphi ที่กำลังมองหาโซลูชันที่แข็งแกร่ง ยืดหยุ่น และมีประสิทธิภาพเพื่อรวมการสืบค้นที่อยู่ออนไลน์เข้ากับแอปพลิเคชันของตน
การใช้ Boss (ตัวจัดการการพึ่งพาสำหรับ Delphi) ทำให้สามารถติดตั้งไลบรารี่ได้โดยอัตโนมัติ
boss install https://github.com/antoniojmsjr/BuscaCEP
หากคุณเลือกที่จะติดตั้งด้วยตนเอง เพียงเพิ่มโฟลเดอร์ต่อไปนี้ในโครงการของคุณ ภายใต้ โครงการ > ตัวเลือก > Delphi Compiler > เป้าหมาย > การกำหนดค่าทั้งหมด > เส้นทางการค้นหา
.. BuscaCEP Source
ผู้ให้บริการ | คุณใช้ APIKey หรือไม่? | ค้นหาด้วยรหัสไปรษณีย์? | * ค้นหาสถานที่สาธารณะ? |
---|---|---|---|
จดหมาย | เลขที่ | ใช่ | ใช่ |
ผ่านทาง CEP | เลขที่ | ใช่ | ใช่ |
API ของบราซิล | เลขที่ | ใช่ | เลขที่ |
เปิด CEP | ใช่ | ใช่ | ใช่ |
สาธารณรัฐเสมือน | เลขที่ | ใช่ | เลขที่ |
รหัสไปรษณีย์ที่ถูกต้อง | เลขที่ | ใช่ | ใช่ |
คิงโฮสต์ | ใช่ | ใช่ | เลขที่ |
โพสมอน | เลขที่ | ใช่ | เลขที่ |
ฟรี CEP | ใช่ | ใช่ | ใช่ |
เปิด CEP | ใช่ | ใช่ | ใช่ |
CEP API | ใช่ | ใช่ | ใช่ |
บราซิล โอเพ่น | ใช่ | ใช่ | ใช่ |
API ที่ยอดเยี่ยม | เลขที่ | ใช่ | เลขที่ |
* หากต้องการสอบถามโดยใช้ที่อยู่ จำเป็นต้องมีพารามิเตอร์บังคับ 3 รายการ ได้แก่ รัฐ เมือง และถนน
ในการจัดเตรียมรหัส IBGE และรหัส DDD สำหรับตำแหน่งเมื่อส่งคืนแบบสอบถาม ไฟล์ BuscaCEP .dat จะถูกสร้างขึ้นโดยอิงตาม API ตำแหน่ง IBGE และข้อมูลที่ Anatel ให้ไว้
ตัวอย่างมีอยู่ในโฟลเดอร์โครงการ:
.. BuscaCEP Samples
สอบถามตามรหัสไปรษณีย์
uses
BuscaCEP , BuscaCEP .Types, BuscaCEP .Interfaces, System.SysUtils;
var
l BuscaCEP Response: I BuscaCEP Response;
lMsgError: string;
begin
try
l BuscaCEP Response := T BuscaCEP .New
// .SetArquivoCache() [OPCIONAL]
.Providers[T BuscaCEP ProvidersKind.Correios]
// .SetAPIKey() [CONFORME O PROVEDOR]
.Filtro
.SetCEP( ' 90520-003 ' )
.Request
// .SetTimeout() [OPCIONAL]
.Execute;
except
on E: E BuscaCEP Request do
begin
lMsgError := Concat(lMsgError, Format( ' Provider: %s ' , [E.Provider]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' DateTime: %s ' , [DateTimeTostr(E.DateTime)]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Kind: %s ' , [E.Kind.AsString]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' URL: %s ' , [E.URL]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Method: %s ' , [E.Method]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Status Code: %d ' , [E.StatusCode]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Status Text: %s ' , [E.StatusText]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Message: %s ' , [E.Message]));
Application.MessageBox(PWideChar(lMsgError), ' A T E N Ç Ã O ' , MB_OK + MB_ICONERROR);
Exit;
end ;
on E: Exception do
begin
Application.MessageBox(PWideChar(E.Message), ' A T E N Ç Ã O ' , MB_OK + MB_ICONERROR);
Exit;
end ;
end ;
end ;
ให้คำปรึกษาโดย Street
uses
BuscaCEP , BuscaCEP .Types, BuscaCEP .Interfaces, System.SysUtils;
var
l BuscaCEP Response: I BuscaCEP Response;
lMsgError: string;
begin
try
l BuscaCEP Response := T BuscaCEP .New
// .SetArquivoCache() [OPCIONAL]
.Providers[T BuscaCEP ProvidersKind.Correios]
// .SetAPIKey() [CONFORME O PROVEDOR]
.Filtro
.SetLogradouro( ' Avenida Plínio Brasil Milano ' )
.SetLocalidade( ' Porto Alegre ' )
.SetUF( ' RS ' )
.& End
.Request
// .SetTimeout() [OPCIONAL]
.Execute;
except
on E: E BuscaCEP Request do
begin
lMsgError := Concat(lMsgError, Format( ' Provider: %s ' , [E.Provider]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' DateTime: %s ' , [DateTimeTostr(E.DateTime)]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Kind: %s ' , [E.Kind.AsString]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' URL: %s ' , [E.URL]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Method: %s ' , [E.Method]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Status Code: %d ' , [E.StatusCode]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Status Text: %s ' , [E.StatusText]), sLineBreak);
lMsgError := Concat(lMsgError, Format( ' Message: %s ' , [E.Message]));
Application.MessageBox(PWideChar(lMsgError), ' A T E N Ç Ã O ' , MB_OK + MB_ICONERROR);
Exit;
end ;
on E: Exception do
begin
Application.MessageBox(PWideChar(E.Message), ' A T E N Ç Ã O ' , MB_OK + MB_ICONERROR);
Exit;
end ;
end ;
end ;
ผลลัพธ์การสืบค้น [I BuscaCEP Response]
uses
BuscaCEP .Types, BuscaCEP .Interfaces;
var
l BuscaCEP Response: I BuscaCEP Response;
l BuscaCEP Logradouro: T BuscaCEP Logradouro;
begin
for l BuscaCEP Logradouro in l BuscaCEP Response.Logradouros do
begin
l BuscaCEP Logradouro.Logradouro;
l BuscaCEP Logradouro.Complemento;
l BuscaCEP Logradouro.Unidade;
l BuscaCEP Logradouro.Bairro;
l BuscaCEP Logradouro.Localidade.Nome;
l BuscaCEP Logradouro.Localidade.IBGE;
l BuscaCEP Logradouro.Localidade.DDD;
l BuscaCEP Logradouro.Localidade.Estado.Nome;
l BuscaCEP Logradouro.Localidade.Estado.IBGE;
l BuscaCEP Logradouro.Localidade.Estado.Sigla;
l BuscaCEP Logradouro.Localidade.Estado.Regiao.Nome;
l BuscaCEP Logradouro.Localidade.Estado.Regiao.IBGE;
l BuscaCEP Logradouro.Localidade.Estado.Regiao.Sigla;
l BuscaCEP Logradouro.CEP;
end ;
ผลลัพธ์การค้นหา [JSON]
{
"provider" : " #CORREIOS " ,
"date_time" : " 2024-05-01T02:35:14.772-03:00 " ,
"request_time" : " 75ms " ,
"total" : 1 ,
"logradouros" : [
{
"logradouro" : " Avenida Plínio Brasil Milano " ,
"complemento" : " de 1947 ao fim - lado ímpar " ,
"unidade" : " " ,
"bairro" : " Passo da Areia " ,
"cep" : " 90520003 " ,
"localidade" : {
"ibge" : 4314902 ,
"ddd" : 51 ,
"nome" : " Porto Alegre " ,
"estado" : {
"ibge" : 43 ,
"nome" : " Rio Grande do Sul " ,
"sigla" : " RS " ,
"regiao" : {
"ibge" : 4 ,
"nome" : " Sul " ,
"sigla" : " S "
}
}
}
}
]
}
ดาวน์โหลด: Demos.zip
BuscaCEP
เป็นซอฟต์แวร์โอเพ่นซอร์สฟรีที่ได้รับอนุญาตภายใต้