Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


delphi med internet

Postades av 2003-03-22 23:35:30 - Simon Östergren, i forum delphi, Tråden har 7 Kommentarer och lästs av 1276 personer

hejsan.
behöver någon länk där det står hur man arbetar med delphi på internet.
typ ladda ned filer, ta hem text från en hemsida osv.
skulle hjälpa mig otroligt mycket


Svara

Sv: delphi med internet

Postades av 2003-03-23 20:24:23 - Robert Halvarsson

Vilken version har du?
i vissa delphi versioner ingår Internet komponenter.


Svara

Sv: delphi med internet

Postades av 2003-03-24 07:59:17 - Simon Östergren

jag har borland delphi 7


Svara

Sv: delphi med internet

Postades av 2003-03-24 10:21:40 - Jonas Svensson

Använder du D7 så följer Indy komponenterna antagligen med. Tror även det följer med diverse demo applikationer. Annars kan du hämta exempel, komponenter m.m från deras sida.
http://www.indyproject.org/

Du kan även använda komponenterna från TP det följer med exempel och en manual i pdf-format.
TurboPower Internet Professional
http://sourceforge.net/projects/tpipro

Ett annat alternativ Internet Component Suite:
http://overbyte.delphicenter.com/eng/products/ics.html


Svara

Sv: delphi med internet

Postades av 2003-04-06 18:44:00 - Simon Östergren

ok tack.
har iallafall fått lite hjälp med det.
använder kommandot "DownloadFile".
Så att tanka hem funkar.

Nu skulle jag behöva avbryta nedladdningen. (men filen ska kunna användas),
Vi lyckades strypa nedladdningshastigheten till 0, eller hur man nu ska kunna förklara det.
Men programmet ligger ju forfarande på denna fil som tankas.
Jag vill kunna öppna filen med programmet efter nedladdning.
Men då står det att filen används. Pga att programmet ligger och tankar i 0kb/sec till den.

Går det att helt enkelt bara avbryta nedladdningen istället för att sänka hastigheten?


Svara

Sv: delphi med internet

Postades av 2003-04-07 12:55:35 - Håkan Nilsson

Vet inte vad du använder för komponent / klass eftersom du inte angivit det.
Kan ej heller dra mig till minnes metoden DownloadFile men om du använder Indy komponeterna (ex IdTCP, eller IdHTTP) som kommer med Delphi så kan du använda DissconnectSocket eller Disconnect.


Svara

Sv: delphi med internet

Postades av 2003-04-07 16:26:02 - Simon Östergren

frågan är bara hur man använder dom.
koppla upp sig och tanka fil m.m.
kan inget sådant alls.
fattar inget utav det som står i helpmanualen som följer med delphi 7 heller.


Svara

Sv: delphi med internet

Postades av 2003-04-07 23:32:40 - Håkan Nilsson

Här är ett exempel som jag klippte ur ett webrelaterat verktyg jag byggde en gång i den glada IT-bubblan :)

<code>
procedure TfrmMain.RetrieveImage(Obj : TObject);
var
data : String;
imageData : TMemoryStream;
begin
Screen.Cursor := crHourGlass;
try
if (not FileExists(CACHE_DIR + IntToStr(TDataPack(Obj).EntryId) +'.jpg')) then
begin
Image1.Picture.LoadFromFile(AppDir() + 'working.jpg');
Refresh;

imageData := TMemoryStream.Create();
IdHTTP1.Get(TDataPack(Obj).ImageUrl ,imageData);
if (imageData.Size = 0) then Abort;

imageData.SaveToFile(CACHE_DIR +IntToStr(TDataPack(Obj).EntryId)+'.jpg');

if FAutoDeleteBad then
if IsBadImage(imageData) then
begin
AutoRefuse(TDataPack(Obj));
UpdateControls();
Abort;
end;
end;

Image1.Picture.LoadFromFile(CACHE_DIR +IntToStr(TDataPack(Obj).EntryId)+'.jpg');

Panel2.Caption := Format('Size : (%d x %d)',[Image1.Picture.Width,Image1.Picture.Height]);
finally
imageData.Free;
Screen.Cursor := crDefault;
end;
end;

</code>

Det intrassanta bitarna är :
1. Skapa en stream. I detta fallet en MemoryStream. Den kommer vi att använda för att lagra den hämtade datan (om det bara är text du är ute efter finns en verion av Get som returnerar en sträng och då behövs inte något stream objekt)
2. Anropa Get-Metoden på ditt IndyHTTP object (IdHTTP1 i detta fallet) och skicka med URLen och Streamen som parametrar.

Om allt gott bra så bör du nu ha din data i din stream och kan till exempel spara den med SaveToFile eller något liknande.

Hoppas det klarnar lite och bry dig inte alltför mycket om alla konstanter och tjafs i koden... de viktiga raderna är

<code>
imageData := TMemoryStream.Create();
IdHTTP1.Get('http://server/bilder/minbild.jpg' ,imageData);
imageData.SaveToFile('minbild.jpg');
imageData.Free;
</code>


Happy coding...
/H


Svara

Nyligen

  • 09:09 Vill du köpa medicinska tester?
  • 12:47 Vem beviljar assistansen – kommune
  • 14:17 Någon med erfarenhet av hemstädnin
  • 14:14 Bör man använda sig av en båtförme
  • 14:12 Finns det någon intressant hundblo
  • 14:25 Tips på verktyg för att skapa QR-k
  • 14:23 Tips på verktyg för att skapa QR-k
  • 20:52 Fungerer innskuddsbonuser egentlig

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 569 159
27 952
271 704
1 227
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies