Jump to content

SUBIECTE NOI
« 1 / 5 »
RSS
Deparazitare externa pisici fara ...

Seriale turcesti/coreene online H...

Merita un Termostat Smart pentru ...

Sfat achizitie MTB Devron Riddle
 Problema mare cu parintii= nervi ...

switch microtik

Permis categoria B la 17 ani

Sfaturi pentru pregatirea de eval...
 Crapaturi placa

cum imi accesez dosarul electroni...

Momentul Aprilie 1964

Sursa noua - zgomot ?
 A fost lansat Ubuntu 24.04 LTS

Pareri apartament in zona Berceni?

Free streaming SkyShowtime de la ...

Skoda Fabia 1.0 TSI (110 CP)- 19 ...
 

Functie declarata si neluata in seama...delphi

- - - - -
  • Please log in to reply
3 replies to this topic

#1
diaconuliviu

diaconuliviu

    Senior Member

  • Grup: Senior Members
  • Posts: 4,772
  • Înscris: 19.01.2005
Am urmatoarea eroare:

Undeclared Identifier: FT_ReadEE


Linia este in MAIN.pas


PortStatus:=FT_ReadEE(ftHandle,Offset,EEPromData[Offset]);

In Main.pas la Uses am printre altele D2XXUnit

In D2XXUnit.pas am..

// EEPROM primitives - you need an NDA for EEPROM checksum
function FT_ReadEE(ftHandle:DWord; WordAddr:DWord; WordRead:Pointer):FT_Result; stdcall; External FT_DLL_Name name 'FT_ReadEE';


De ce primesc acel mesaj de eroare, din moment ce d2xxUnit e declarat, .dll este in folder (este si driverul instalat, dealtfel)?

Multumesc

#2
csgabe

csgabe

    Active Member

  • Grup: Members
  • Posts: 1,523
  • Înscris: 08.12.2009
Incearca
External FT_DLL_Name name 'FT_ReadEE.dll';


#3
diaconuliviu

diaconuliviu

    Senior Member

  • Grup: Senior Members
  • Posts: 4,772
  • Înscris: 19.01.2005
.dll este ftd2xx.dll.

In el se regasesc toate functiile referitoare la FTDI

Si e declarata:

FT_DLL_Name = 'FTD2XX.DLL';

Edited by diaconuliviu, 26 May 2017 - 11:55.


#4
diaconuliviu

diaconuliviu

    Senior Member

  • Grup: Senior Members
  • Posts: 4,772
  • Înscris: 19.01.2005
Am reusit folosind o functie modificata.

USB_FT_ReadEE(Offset)

function USB_FT_ReadEE(WordAddr:Dword) : FT_Result;
begin
Result := FT_ReadEE(FT_Handle,WordAddr,@WordRead);
end;


Acum am alta belea: vreau sa scriu in FTDI dar imi scrie balarii.


S:='';
For Offset :=0 to $4F  do
begin
Read(OpenFile,EEPromArray[Offset]);
S:=S+IntToHex(EEPromArray[Offset],4)+' ';
If  ((Offset+1) mod $8) =0  then  S:= S +#13#10;

end;
ShowMessage(S);  //Imi arata continutul EEProm corect...deci se incarca in "array".


    Offset:=0;
  
  While Offset < $4F do
  
    If USB_FT_WriteEE(Offset,EEPromArray[Offset]) =FT_OK then
  //begin
  //ShowMessage ('FT_ ' + IntToStr( USB_FT_WriteEE(Offset,EEPromArray[Offset])));
  //ShowMessage (' Offset = '+ inttohex(Offset,4)+ '  Array = ' + inttohex(EEPromArray[Offset],4));
  //end;
    //end;
  Inc(Offset);

Ei, bine, dupa rularea ei imi umple eepromul de FF. Unde gresesc?

Functia cu rosu:


  function USB_FT_WriteEE(WordAddr:Dword; WordData:Word) : FT_Result;
begin
Result := FT_WriteEE(FT_Handle,WordAddr,WordData);
end;

Anunturi

Chirurgia endoscopică a hipofizei Chirurgia endoscopică a hipofizei

"Standardul de aur" în chirurgia hipofizară îl reprezintă endoscopia transnazală transsfenoidală.

Echipa NeuroHope este antrenată în unul din cele mai mari centre de chirurgie a hipofizei din Europa, Spitalul Foch din Paris, centrul în care a fost introdus pentru prima dată endoscopul în chirurgia transnazală a hipofizei, de către neurochirurgul francez Guiot. Pe lângă tumorile cu origine hipofizară, prin tehnicile endoscopice transnazale pot fi abordate numeroase alte patologii neurochirurgicale.

www.neurohope.ro

0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users

Forumul Softpedia foloseste "cookies" pentru a imbunatati experienta utilizatorilor Accept
Pentru detalii si optiuni legate de cookies si datele personale, consultati Politica de utilizare cookies si Politica de confidentialitate