نمایش نتایج 1 تا 2 از 2

نام تاپیک: باز کردن یک url در دلفی 7

  1. #1
    کاربر دائمی آواتار pooyeshpajooh
    تاریخ عضویت
    دی 1384
    محل زندگی
    iran kashuuuuuuun
    پست
    115

    باز کردن یک url در دلفی 7

    یک url داریم از یک سایت Https
    https://api.binance.com/api/v1/ticke...symbol=BTCUSDT
    تو دلفی 7 می خوایم بازش کنیم
    حتی indy رو هم به ورژن 10 اپدیت کردم
    ولی باز هم موقع باز کردن خطا می ده
    ایا ر دلفی 7 راهی برای بازکردن سایت https هست ؟

  2. #2

    نقل قول: باز کردن یک url در دلفی 7

    این نمونه رو ببینید

    uses WinInet;
    .
    .
    .

    function Internet_Get(URL: string): string;
    var
    NetHandle: HINTERNET;
    UrlHandle: HINTERNET;
    Buffer: array[0..1024] of Char;
    BytesRead, TotalRead: dWord;
    begin
    Result := '';


    NetHandle := InternetOpen('Delphi 5.x', INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0);


    if Assigned(NetHandle) then
    begin
    UrlHandle := InternetOpenUrl(NetHandle, PChar(Url), nil, 0, INTERNET_FLAG_RELOAD, 0);


    if Assigned(UrlHandle) then
    { UrlHandle valid? Proceed with download }
    begin
    TotalRead := 0;
    FillChar(Buffer, SizeOf(Buffer), 0);
    repeat
    Result := Result + Buffer;
    FillChar(Buffer, SizeOf(Buffer), 0);
    InternetReadFile(UrlHandle, @Buffer, SizeOf(Buffer), BytesRead);
    TotalRead := TotalRead + BytesRead;
    until BytesRead = 0;
    InternetCloseHandle(UrlHandle);
    Result := LeftStr(Result, TotalRead);
    end
    else
    { UrlHandle is not valid. Raise an exception. }
    raise Exception.CreateFmt('Cannot open URL %s', [Url]);


    InternetCloseHandle(NetHandle);
    end
    else
    { NetHandle is not valid. Raise an exception }
    raise Exception.Create('Unable to initialize Wininet');
    end;


    توابع تبدیل تاریخ با دقت 5000 سال
    پذیرش پروژه، کامپوننت، آموزش برنامه نویسی (دلفی، اس کیو ال، ..) -> 09123780840

    دوستای گلم حمایت کنید : https://cafebazaar.ir/app/com.nikanmehr.marmarxword/


    نرم افزار پخش مویرگی


قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •