Quantcast
Channel: Intel® Software - Intel® Visual Fortran Compiler for Windows*
Viewing all 5691 articles
Browse latest View live

Fast Fourier Stuff

$
0
0

Steve:

How do you make a complex array allocatable as a double if all the other real elements are the Real(kind=dp)?

Why am I using real(kind=dp) if all it really is is a double?

Or am I overthinking this?

I am using your mkl routines for FFT in the FFT subroutine

John

  !  Wulf.f90
    !
    !  FUNCTIONS:
    !  Wulf - Entry point of console application.
    !

    !****************************************************************************
    !
    !  PROGRAM: Wulf
    !
    !  PURPOSE:  Entry point for the console application.
    !
    !****************************************************************************

    program Wulf
    use BASE
    use FastFourierTransform
    use S

    implicit none
    integer i,ISTAT,count, dummy
    REAL (KIND=dp) time
    Double Complex :: X(NF)
    REAL (KIND=dp), ALLOCATABLE :: aXYZ(:,:)
    !REAL (KIND=dp) aXYZ(count1, 3)


    open(sm,FILE="m.csv",status = "unknown")
    open(1, file="m.in", STATUS = 'old')
    read(1,*)count

    ALLOCATE (aXYZ(count1,count),STAT=istat)
    IF (istat.NE.0) THEN
        WRITE (*, *) '*** Could not allocate some arrays in LINSOLVE'
        STOP
    END IF
    time = 0.1d0


    do i =1,NF
        if(i .eq. 1) then
            x(i) = (0.70154d0,0.0d0)
        elseif(i .eq. 2) then
            x(i) =(-2.5018d0,0.0d0)
        elseif(i .eq. 3) then
            x(i) = (-0.35385d0,0.0d0)
        elseif(i .eq. 4) then
            x(i) = (-0.82359d0,0.0d0)
        elseif(i .eq. 5) then
            x(i) = (-1.5771d0,0.0d0)
        elseif(i .eq. 6) then
            x(i) = (0.50797d0,0.0d0)
        elseif(i .eq. 7) then
            x(i) = (0.28198d0,0.0d0)
        elseif(i .eq. 8) then
            x(i) = (0.03348d0, 0.0d0)
        end if
    end do

    ! Variables

    ! Body of Wulf
    print *, 'Hello World'
    call pardiso_unsym(aXYZ,count,1)
    call FFT(sm, NF, time, X)
    end program Wulf

 


Faster 3-D array access?

$
0
0

Hi,

I've got a very large 3-D array I access randomly so that I am memory-bound 32% of the time.  A quick attempt to move the the data into several very large 2-D arrays didn't seem to help significantly.  I'm starting to wonder about some version of equivalence statements into thousands of vectors or some such.  There is no obvious (static) pattern of data access that would suggest a way to rearrange the indices.  Any thoughts?

thanks,

Bruce

2016 updates

$
0
0

How do you get to the area where you can download updates to the 2016 parallel studio composer XE for fortran?

DAAL 2016 update 3 seems to break VS2015 integration

$
0
0

Dear all,

the Intel software manager has given the info that for the DAAL 2016 a new update (update 3) was available today. I installed it and after that the Fortran integration into VS was corrupted or gone. VS does not recognize the Fortran *.vfproj files and gives an error. No new Fortran projects could be built. Under tools/options/ -> intel compilers some empty C++ entries are seen.

VS 2015 professional update 2 + PS XE 2016 Composer Edition Fortran update 3

These steps has also not worked: https://software.intel.com/en-us/articles/troubleshooting-fortran-integr...

I had to de-install all Intel PS XE software and hat to make a 'clean' new installation (PS XE 2016 up.3) to get things working again. 'Modify' has not worked correctly (no text editor syntax highlighting,...) and repair gave a cryptic error message... During de-installation Intel 'C++ integrations' were removed. Is this the root of the error? I had installed them never before, only the DAAL update could have done so?

Maybe this prevents you from doing the same or maybe you have more luck than me. However, I had never before problems with the integration.

Best regards, Johannes

 

Microsoft Visual Studio Professional 2015
Version 14.0.25123.00 Update 2
Microsoft .NET Framework
Version 4.6.01055

Installed Version: Professional

Intel® Parallel Studio XE 2016 Update 3 Composer Edition for C++ Windows* Package ID: w_comp_lib_2016.3.207 Intel® Parallel Studio XE 2016 Update 3 Composer Edition for C++ Windows* Integration for Microsoft* Visual Studio* 2015, Version 16.0.120.14, Copyright © 2002-2016 Intel Corporation. All rights reserved. * Other names and brands may be claimed as the property of others. Intel® Parallel Studio XE 2016 Update 3 Composer Edition for Fortran Windows* Package ID: w_comp_lib_2016.3.207

Intel® Parallel Studio XE 2016 Update 3 Composer Edition for Fortran Windows* Integration for Microsoft Visual Studio* 2015, Version 16.0.0062.14, Copyright © 2002-2016 Intel Corporation. All rights reserved. * Other names and brands may be claimed as the property of others.

dialog graphics

$
0
0

I realize that the Intel compiler in C++ would allow you to draw a graphic within a modal dialog box but can Fortran also do that and if so, what  object can I draw into?

Thanks,

Brooks Van Horn

floating point precision

$
0
0

Using Intel's i5 and i7 hardware, would a double precision ieee format be better utilized with a REAL( kind = 10 ) rather than a REAL ( kind = 8 ) format. The GNU gfortran uses kind=10 but our Intel v16 compiler barfs at kind=10. Don't you get segment faults with arrays of kind=8 but not with kind=10? What is the reason for not using kind=10 or kind=20?

 

Thanks,

Brooks V

Posts lost

$
0
0

Steve:

I posted 2 messages to the MKL board and they do not show, but they show up in my dashboard. Both called MKL and Returns.

Any ideas?

John

Installing Visual Fortran Shell 2013 from Intel® Parallel Studio XE Composer Edition for Fortran with Rogue Wave IMSL 7.0 for Wi

$
0
0

Hi,

I recently purchased an Intel Parallel Studio XE Composer Edition for Fortran with Rogue Wave IMSL 7.0 for Windows compiler. When I initially installed the compiler. I installed a trail version of Visual Studio 2012 Professional in order to run the Fortran program I needed from the compiler. After the Compiler was installed it chose the trial version of 2012 as the program through which it can be opened. I recently found out however, that the compiler itself comes with a free version of Visual Studio Shell 2013. Since my VS Professional 2012 only has so little time left in its trial period I was wondering how I would go about installing the free version of VS Shell 2013 that comes with my compiler order and switch the settings so that the Fortran runs on VS 2013 instead of 2012. Would I need to uninstall VS 2012 in order to install 2013 properly or something? Any and all help would be most appreciated. Thank you!


Replicating Save Fortran Environment

$
0
0

To Whom It May Concern;

I write to ask whether anyone has a way to replicate the old CVF 'save fortran environment' function.  I have a number of libraries to bind against.  Every time I create I new VS2015 project, I have to add them to the solution.  Is there a way to create a blank template solution that I can copy to a new location and rename so that all the libraries will be present?

Any advice on this is welcome.  Thank you.

 

Sincerely,

CHobbs

VS 2015

$
0
0

Steve:

I am a bit lost. I pulled off all of the INTEL Compilers, and then installed VS2015 - Community Edition - with what I thought was everything turned on. I then added the NEW BETA and tried out a program with DISLIN library from Germany.

Exactly the same project runs perfectly on VS2013, but I get C++ errors on compile, cannot find scanf etc on VS2015.  Clearly I goofed but where

Every program that does not have DISLIN runs perfectly the same on both Studios.

Thanks

John

tabbing and tab order

$
0
0

Hi all,

I'm running IVF XE 16 R3 and MSVS 2013 Community version. I'm having some tab related difficulties and don't know where to turn. I used Ctrl-D to set my tab order when I noticed that the order included controls that didn't say they were tab related. The second part is that when I'm in an EDITTEXT control, say IDC_M1, and hit the tab key, I get a beep sound and no movement. Part of my .rc file follows:

IDD_PMAIN DIALOGEX 0, 0, 110, 476
STYLE DS_ABSALIGN | DS_SETFONT | DS_NOIDLEMSG | DS_NOFAILCREATE | WS_CHILD | WS_VISIBLE | WS_CLIPSIBLINGS | WS_CLIPCHILDREN | WS_BORDER
EXSTYLE WS_EX_NOPARENTNOTIFY | WS_EX_CONTROLPARENT
FONT 10, "Calisto MT", 400, 0, 0x0
BEGIN
    CONTROL         "Central",IDC_CENT,"Button",BS_AUTORADIOBUTTON | BS_LEFTTEXT | BS_NOTIFY | WS_GROUP | WS_TABSTOP,4,84,39,10,WS_EX_RIGHT
    CONTROL         "RAW",IDC_RAW,"Button",BS_AUTORADIOBUTTON | BS_NOTIFY | WS_TABSTOP,56,84,34,10
    EDITTEXT        IDC_M1,24,107,56,11,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN,WS_EX_ACCEPTFILES
    EDITTEXT        IDC_M2,24,119,56,11,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN | ES_NUMBER,WS_EX_ACCEPTFILES
    EDITTEXT        IDC_M3,24,131,56,11,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN,WS_EX_ACCEPTFILES
    EDITTEXT        IDC_M4,24,143,56,11,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN,WS_EX_ACCEPTFILES
    PUSHBUTTON      "<==",IDC_OTHER,82,124,18,14,BS_CENTER,WS_EX_CLIENTEDGE
    PUSHBUTTON      "Fit Pearson Curve",IDC_FIT,20,158,64,14,BS_CENTER,WS_EX_CLIENTEDGE
    PUSHBUTTON      "Clear Data",IDC_CLEAR,69,256,36,14,BS_CENTER,WS_EX_CLIENTEDGE
    EDITTEXT        IDC_NUMRS,48,224,45,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN | ES_NUMBER
    EDITTEXT        IDC_TOTALS,59,238,38,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_NUMBER,WS_EX_CONTROLPARENT
    PUSHBUTTON      "Generate More Data",IDC_MORE,1,256,67,14,BS_CENTER,WS_EX_CLIENTEDGE
    PUSHBUTTON      "E&xit",IDC_EXIT,31,437,36,14,BS_CENTER
    EDITTEXT        IDC_PCTYPE,38,61,22,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_NUMBER | WS_GROUP,WS_EX_LEFTSCROLLBAR
    CONTROL         "",IDC_MYSPIN,"msctls_updown32",UDS_SETBUDDYINT | UDS_ALIGNRIGHT | UDS_AUTOBUDDY | UDS_ARROWKEYS | WS_GROUP | WS_TABSTOP,60,61,13,12
    CONTROL         "Statistics",IDC_STAT,"Button",BS_AUTORADIOBUTTON | BS_VCENTER | WS_GROUP | WS_TABSTOP,5,191,43,10
    CONTROL         "PDF",IDC_PDF,"Button",BS_AUTORADIOBUTTON | BS_VCENTER | WS_TABSTOP,5,202,30,10
    CONTROL         "CDF",IDC_CDF,"Button",BS_AUTORADIOBUTTON | BS_VCENTER | WS_TABSTOP,5,213,31,10
    CONTROL         "Histogram",IDC_HISTO,"Button",BS_AUTORADIOBUTTON | BS_VCENTER | WS_TABSTOP,48,197,49,10
    CONTROL         "EDF",IDC_EDF,"Button",BS_AUTORADIOBUTTON | BS_VCENTER | WS_TABSTOP,47,208,31,10
    LTEXT           "Select Curve Type",IDC_STATIC,22,52,58,8
    LTEXT           "Select Type of Moments",IDC_STATIC,12,76,77,8
    LTEXT           "1st=",IDC_STATIC,9,109,14,8
    LTEXT           "2nd=",IDC_STATIC,7,121,16,8
    LTEXT           "3rd=",IDC_STATIC,9,133,15,8
    LTEXT           "4th=",IDC_STATIC,9,144,15,8
    LTEXT           "Enter Moments 1-4",IDC_STATIC,20,97,65,8
    CTEXT           "Display Options",IDC_STATIC,20,183,50,8,NOT WS_GROUP,WS_EX_TRANSPARENT
    LTEXT           "Sample Size =",IDC_STATIC,2,226,46,8
    LTEXT           "Total Generated =",IDC_STATIC,2,240,56,8
    LTEXT           "Percentile Values",IDC_STATIC,20,280,56,8
    LTEXT           "Percentile",IDC_STATIC,7,290,32,8
    LTEXT           "x-Value",IDC_STATIC,65,290,25,8
    EDITTEXT        IDC_XVAL,57,298,41,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN | ES_NUMBER,WS_EX_STATICEDGE
    PUSHBUTTON      "==>",IDC_CALC,39,297,18,14,BS_CENTER
    EDITTEXT        IDC_PCNT,7,298,32,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN,WS_EX_STATICEDGE
    EDITTEXT        IDC_TITLE,7,34,90,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_READONLY | NOT WS_BORDER,WS_EX_TRANSPARENT
    LTEXT           "x-Value",IDC_STATIC,8,322,25,8
    EDITTEXT        IDC_XVALUE,5,330,33,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN,WS_EX_STATICEDGE
    LTEXT           "Probability",IDC_STATIC,64,322,33,8
    EDITTEXT        IDC_CDFVAL,58,330,41,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN | ES_NUMBER,WS_EX_STATICEDGE
    LTEXT           "CDF Values",IDC_STATIC,28,313,37,8
    PUSHBUTTON      "==>",IDC_CALCDF,39,329,18,14,BS_CENTER
    LTEXT           "__________________________________________________",IDC_STATIC,0,269,108,10,0,WS_EX_TRANSPARENT
    LTEXT           "__________________________________________________",IDC_STATIC,0,424,108,10,0,WS_EX_TRANSPARENT
    LTEXT           "__________________________________________________",IDC_STATIC,1,41,108,10,0,WS_EX_TRANSPARENT
    LTEXT           "__________________________________________________",IDC_STATIC,0,22,108,10,0,WS_EX_TRANSPARENT
    LTEXT           "__________________________________________________",IDC_STATIC,0,172,108,10,0,WS_EX_TRANSPARENT
    LTEXT           "Mean+6 Sigma=",IDC_STATIC,3,357,50,8
    LTEXT           "Mean+5 Sigma=",IDC_STATIC,3,368,50,8
    EDITTEXT        IDC_6SIG1,52,355,54,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN | ES_NUMBER,WS_EX_STATICEDGE
    EDITTEXT        IDC_6SIG2,52,367,54,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN | ES_NUMBER,WS_EX_STATICEDGE
    LTEXT           "Six Sigma Values",IDC_STATIC,21,345,51,8
    LTEXT           "Mean+4 Sigma=",IDC_STATIC,3,380,50,8
    EDITTEXT        IDC_6SIG3,52,379,54,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN | ES_NUMBER,WS_EX_STATICEDGE
    LTEXT           "Mean+3 Sigma=",IDC_STATIC,3,392,49,8
    EDITTEXT        IDC_6SIG4,52,391,54,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN | ES_NUMBER,WS_EX_STATICEDGE
    LTEXT           "Mean+2 Sigma=",IDC_STATIC,3,403,49,8
    EDITTEXT        IDC_6SIG5,52,402,54,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN | ES_NUMBER,WS_EX_STATICEDGE
    LTEXT           "Mean+1 Sigma=",IDC_STATIC,3,415,49,8
    EDITTEXT        IDC_6SIG6,52,414,54,12,ES_CENTER | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_WANTRETURN | ES_NUMBER,WS_EX_STATICEDGE
    EDITTEXT        IDC_REGTO,2,14,106,12,ES_CENTER | ES_MULTILINE | ES_AUTOVSCROLL | ES_AUTOHSCROLL | ES_NOHIDESEL | ES_READONLY | NOT WS_BORDER | NOT WS_TABSTOP,WS_EX_TRANSPARENT
    CTEXT           "PDC",IDC_STATIC,0,0,108,12,SS_CENTERIMAGE | SS_SUNKEN,WS_EX_TRANSPARENT
    DEFPUSHBUTTON   "",IDC_DEFBUT,36,462,27,14,BS_CENTER | NOT WS_VISIBLE | WS_DISABLED | NOT WS_TABSTOP,WS_EX_TRANSPARENT
END

My code works nicely. It is just the nice things that aren't working. Can anyone givr me an idea on how to fix this?

Thanks,
Brooks Van Horn

make module accessible by dll

$
0
0

Hi all, here i am again...

I'm trying to let a subroutine contained in a .dll access variables of the executable, which are declared in a module of the executable. Since this is not possible, i tried to move those variables to a module belonging to the .dll source. the .dll project compiles and links just fine. the executable does not link to those variables.

what is happening?

thank you

fortran dll settings

$
0
0

I have Fortran code that was made into a dll using Compaq visual fortran some years ago.  I made a change ot the fortran, and now need to recompile into a dll using visual Studio & Intel fortran.

The application worked so long as the following settings were used in Compaq:

In Project/Settings.../Fortran:

a. Category = external procedures: 1) argument passing conventions: default*; 2) external name interpretation: uppercase*; 3) string length argument passing: after string arg*

b. Category = Fortran language: a) name interpretation: upper case*

c. Category = Libraries: a) reentrancy support: none; b) Use run-time library: Debug single-threaded* (and verify 'libs:static' was listed in project options.

My question is: where are these settings and options located in Visual Studio/Intel Fortran?

Thanks.

Backwards compatibility for the MPI to get Abaqus to work with Fortran compiler?

$
0
0

Hey everyone. I'm currently bumping into some issues right now, and I feel like this might be a good place to ask.

First off, here's my setup

  • Windows 10 x64
  • Abaqus 6.14-2 with MPI version 3.0.2369
  • Visual Studio Community 2015 (C++ SDK is the only selected option)
  • Intel Parallel Studio XE Cluster 2016 (Fortran compiler was selected)
  • Installed in this order

Now, I noticed that the MPI version that was installed with the intel studio was 5.1, where the version abaqus 6.14 expects to use is 3.0.2369. I have a hunch that this might be causing my issues. So how I know I have a problem: When I attempt to perform the command "abaqus verify -user_std", the abaqus system checks all of the links to make sure an analysis may be performed. I receive the following errors when I try to do this:

  • explicitU_static.lib(SMASpxU_XP_IF.obj) : error LNK2019: unresolved external symbol __imp__putenv referenced in function "void __cdecl SMABasOmniSetSSELevel(void)" (?SMABasOmniSetSSELevel@@YAXXZ)
  • explicitU_static.lib(SMASpxU_XP_IF.obj) : error LNK2019: unresolved external symbol __imp_printf referenced in function "void __cdecl SMABasOmniSetSSELevel(void)" (?SMABasOmniSetSSELevel@@YAXXZ)
  • explicitU_static.lib(SMASpxU_XP_IF.obj) : error LNK2019: unresolved external symbol __imp_getenv referenced in function "void __cdecl SMABasOmniSetSSELevel(void)" (?SMABasOmniSetSSELevel@@YAXXZ)
  • explicitU_static.lib(vwave.obj) : error LNK2019: unresolved external symbol memmove referenced in function vwave
  • explicitU_static.lib(vusdfld.obj) : error LNK2001: unresolved external symbol memmove

More LNK2001 errors follow, I won't post all of them. Ultimately, this is the issue at hand. Now, I read in the documentation here that if I have (create?) a system environment variable I_MPI_COMPATIBILITY with a value of 4, it'll backtrack to work with previous MPI standards. So, I created the variable (it didn't previously exist), then set it to 4, ran the test (no luck), set it to 3, ran the test (again, no luck). Is there any way I can get this to work without going back and installing Intel Studio 2012?

CHDIR

$
0
0
I wrote this as a simple program and it works fine - although it prefere IFPORT - now as a routine in WLF I get an access code violaton on run

​Life is a long beach and the life guard is always at the other end
   
!      ****************************************************************
!    
      subroutine chdirA(i)
!
!      ****************************************************************
     
      use IFPOSIX
      implicit none


      CHARACTER(len=255) :: path
      integer i,ilen, ierror
   
   
      CALL PXFGETCWD (path,ilen,ierror)
      WRITE(*,*) TRIM(path)
      call PXFCHDIR("C:\",3,i)
      call PXFCHDIR("users\macne\documents\Visual Studio 2013\Projects\Program070 - Beams\Lothurr",76,i)
       write(*,*)i
       CALL PXFGETCWD (path,ilen,ierror)
       WRITE(*,*) TRIM(path)
       return
       end subroutine

 


Microsoft C++

$
0
0

I wonder if anyone is on mission critical software and this C++ error affects them.

Why would you change the most basic thing after all these years.

Because you can.

Package Signature Verification Failure

$
0
0

Hello,

I am trying to install Intel Parallel studio XE 2016 SP3 after a laptop renewal (I successfully installed Visual Studio professional 2015).

I have Windows 7 enterprise and admin rights.

I receive the "Package signature verification failed" error and I tried the solutions options listed here, in the linked forum and on the following page: https://software.intel.com/en-us/articles/intel-parallel-studio-xe-insta....

Nothing worked for me.

Which other options do I have?

kind regards

 

Amedeo Rocchi

VTUNE and dlls

$
0
0

I am developing a dll. I have no control over the software that calls this dll. I have performance issues, and I'm sure that VTUNE could be invaluable here. My question is this: Can I use VTUNE in this set of circumstances, and if so, how?

 

PeekMessage causing freeze

$
0
0

I am using PeekMessage to get a keyboard input.

On my computer this works fine but on some computers and with Windows10 it is causing a freeze and the user has to do 'Ctrl Alt Delete'.

I feel as if some resource or memory is getting filled. I have include the code below. I removed the ClipCursor call in case it was causing the problem.

Can you suggest what the problem could be.

Thanks 

        SUBROUTINE GETCHA (K)
!       ----------------------------------------------------------------
!       GET KEYPRESS RETURN WITH VALUE IN K

  use grad_inc

  include 'cgipar.gcb' ! FKEY
       
  type (T_MSG) msg
  
  integer*2 i,iext,k
  integer(bool)   bRet
  logical*4   lret
  

  !!lret=ClipCursor (rectmain) ! to keep cursor within drawing area to stop selecting other option

   10 bRet=PeekMessage (msg,hWndMain,WM_LBUTTONUP,WM_RBUTTONUP,PM_REMOVE) ! LRbutton getcha
  if (bret==1) then
      ! valid message
   if (msg%message==WM_LBUTTONUP) then
    k=32 ! space
    goto 90
   elseif (msg%message==WM_RBUTTONUP) then
    k=184 ! f9
    goto 90
   endif
  endif
!  next function changed from getmessage to peekmessage 22 Dec
  bret=PeekMessage (msg,hWndMain,WM_KEYDOWN,WM_KEYDOWN,PM_REMOVE) ! keydown getcha
  if (bret==1) then
      ! valid message
   k=127
   i=msg%wParam                ! virtual key code
   iext=btest(msg%lParam,24)   ! extended key flag
   if (iext==-1) then  ! changed from if (iext==1) then
    ! arrow key
    if (i==37) then         ! left arrow    VK_LEFT 0025
     k=-76
    elseif (i==38) then     ! up arrow      VK_UP 0026
     k=-85
    elseif (i==39) then     ! right arrow   VK_RIGHT 0027
     k=-82
    elseif (i==40) then     ! down arrow    VK_DOWN 0028
     k=-68
    else
     k=-i
    endif
   else
    if (i>=112.AND.i<=123) then     ! function keys VK_F1 0077 to VK_F12 007B
     k=fkey(i-111) 
    elseif (i>=44.AND.i<=90) then   ! normal keys including 0-9 & A-Z
     k=i
    elseif (i<33) then              ! special keys
     k=i
    elseif (i>=96.AND.i<=105) then  ! numeric keypad 
     k=i-48
    elseif (i>=106.AND.i<=111) then ! maths keys
     k=i-64
    elseif (i>187) then             ! special keys
     k=i-144
    else
     k=i
    endif
    if (k==27) k=184 ! Esc = f9 abort 1/11/02 David Graham
   endif
  else
   ! no messagaes
   k=0
   goto 10
  endif

90      continue
        !!lret=ClipCursor (NULL)
  return
  end subroutine

 

Build application that does not require libifcoremd.dll as an additional file for distribution?

$
0
0

I have installed the distribution libraries.  However, depends.exe states that the application still depends on libifcoremd.dll.  Is there a way for the user to siomply receive and run an exe withtout also having libifcoremd.dll.

Viewing all 5691 articles
Browse latest View live


<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>