(540)  Registro

Español
Wünsche y Sugerencias

Propuestas para künftige Versionen

 
Unterthema: ENUM  [...]  producido.
 
09.01.2015  ▲
 



 
- Página 4 -


Ah, super.

Tal vez könntest Usted - auch así el Rubik "Includes" Deines Profiles  [...]  stimmt -

El Incluir samt PH en Incluye el  [...]  puesto?

Yo glaube como fände ellos el meiste Beachtung si alguien algo como encontrar möchte.
 
15.10.2014  ▲
 




H.Brill
.ph + .inc podría Yo sí automáticamente einmalig generieren.
Incluir sieht ahora así de :
KompilierenMarcaSeparación
 $I MemoryModule.inc
Declare Handle hResInfo, hModule
Declare Memory FN, LV
Declare Int anz, String Func
Declare pfunc&
hResInfo = Res("Info", %HInstance, 10, "listview", 0)

IF hResInfo > 0

    Dim LV, Res("size", %HInstance, hResInfo)
    LV = Res("Get", %HInstance, hResInfo)
    hModule = LoadLibraryM(LV)

ELSE

    MessageBox("Konnte Modul nicht laden...", "Fehler", 0)

EndIf

IF hModule > 0

    Var Handle __ASortListviewproc  = GetProcAddressM(hModule, "ASortListview")
    Var Handle __ASortListviewExproc  = GetProcAddressM(hModule, "ASortListviewEx")
    Var Handle __AddItemValuesproc  = GetProcAddressM(hModule, "AddItemValues")
    Var Handle __AreCheckboxesPresentproc  = GetProcAddressM(hModule, "AreCheckboxesPresent")
    Var Handle __AreIconsPresentproc  = GetProcAddressM(hModule, "AreIconsPresent")
    Var Handle __BuildListviewproc  = GetProcAddressM(hModule, "BuildListview")
    Var Handle __CheckIfMarkedproc  = GetProcAddressM(hModule, "CheckIfMarked")
    Var Handle __ClearListviewproc  = GetProcAddressM(hModule, "ClearListview")
    Var Handle __CloseMessagesproc  = GetProcAddressM(hModule, "CloseMessages")
    Var Handle __ConvertDatasproc  = GetProcAddressM(hModule, "ConvertDatas")
    Var Handle __CopyColumnToproc  = GetProcAddressM(hModule, "CopyColumnTo")
    Var Handle __CopyLineToproc  = GetProcAddressM(hModule, "CopyLineTo")
    Var Handle __CreateImageListproc  = GetProcAddressM(hModule, "CreateImageList")
    Var Handle __CreateListviewproc  = GetProcAddressM(hModule, "CreateListview")
    Var Handle __CryptMemproc  = GetProcAddressM(hModule, "CryptMem")
    Var Handle __CsvToHeaderproc  = GetProcAddressM(hModule, "CsvToHeader")
    Var Handle __CsvToListviewproc  = GetProcAddressM(hModule, "CsvToListview")
    Var Handle __DbfToCsvproc  = GetProcAddressM(hModule, "DbfToCsv")
    Var Handle __DeleteAllItemsproc  = GetProcAddressM(hModule, "DeleteAllItems")
    Var Handle __DeleteColumnproc  = GetProcAddressM(hModule, "DeleteColumn")
    Var Handle __DeleteDoubleItemsproc  = GetProcAddressM(hModule, "DeleteDoubleItems")
    Var Handle __DeleteItemproc  = GetProcAddressM(hModule, "DeleteItem")
    Var Handle __DeleteSpaceLinesproc  = GetProcAddressM(hModule, "DeleteSpaceLines")
    Var Handle __EditManualproc  = GetProcAddressM(hModule, "EditManual")
    Var Handle __EnableDragDropproc  = GetProcAddressM(hModule, "EnableDragDrop")
    Var Handle __EnableEditsproc  = GetProcAddressM(hModule, "EnableEdits")
    Var Handle __EraseListviewproc  = GetProcAddressM(hModule, "EraseListview")
    Var Handle __ExamineColumnproc  = GetProcAddressM(hModule, "ExamineColumn")
    Var Handle __ExchangeBytesproc  = GetProcAddressM(hModule, "ExchangeBytes")
    Var Handle __ExchangeSeparatorproc  = GetProcAddressM(hModule, "ExchangeSeparator")
    Var Handle __FilelistToCsvproc  = GetProcAddressM(hModule, "FilelistToCsv")
    Var Handle __ForbidScrollMessageproc  = GetProcAddressM(hModule, "ForbidScrollMessage")
    Var Handle __GetAllCheckboxStatesproc  = GetProcAddressM(hModule, "GetAllCheckboxStates")
    Var Handle __GetAllSelectedproc  = GetProcAddressM(hModule, "GetAllSelected")
    Var Handle __GetCheckboxStateproc  = GetProcAddressM(hModule, "GetCheckboxState")
    Var Handle __GetCheckedproc  = GetProcAddressM(hModule, "GetChecked")
    Var Handle __GetColumnNameproc  = GetProcAddressM(hModule, "GetColumnName")
    Var Handle __GetColumnUpdateproc  = GetProcAddressM(hModule, "GetColumnUpdate")
    Var Handle __GetColumnWidthproc  = GetProcAddressM(hModule, "GetColumnWidth")
    Var Handle __GetColumnsproc  = GetProcAddressM(hModule, "GetColumns")
    Var Handle __GetControlParasproc  = GetProcAddressM(hModule, "GetControlParas")
    Var Handle __GetDllVersionproc  = GetProcAddressM(hModule, "GetDllVersion")
    Var Handle __GetDragDropParasproc  = GetProcAddressM(hModule, "GetDragDropParas")
    Var Handle __GetEdgeFloatsproc  = GetProcAddressM(hModule, "GetEdgeFloats")
    Var Handle __GetEdgeIntegersproc  = GetProcAddressM(hModule, "GetEdgeIntegers")
    Var Handle __GetFloatproc  = GetProcAddressM(hModule, "GetFloat")
    Var Handle __GetIconproc  = GetProcAddressM(hModule, "GetIcon")
    Var Handle __GetIndexproc  = GetProcAddressM(hModule, "GetIndex")
    Var Handle __GetItemStateproc  = GetProcAddressM(hModule, "GetItemState")
    Var Handle __GetItemTextproc  = GetProcAddressM(hModule, "GetItemText")
    Var Handle __GetItemTextExproc  = GetProcAddressM(hModule, "GetItemTextEx")
    Var Handle __GetItemTextsAsFloatproc  = GetProcAddressM(hModule, "GetItemTextsAsFloat")
    Var Handle __GetItemTextsAsIntegerproc  = GetProcAddressM(hModule, "GetItemTextsAsInteger")
    Var Handle __GetLastKeyproc  = GetProcAddressM(hModule, "GetLastKey")
    Var Handle __GetLineTextproc  = GetProcAddressM(hModule, "GetLineText")
    Var Handle __GetLinesproc  = GetProcAddressM(hModule, "GetLines")
    Var Handle __GetNeededMemoryproc  = GetProcAddressM(hModule, "GetNeededMemory")
    Var Handle __GetNullOffsetproc  = GetProcAddressM(hModule, "GetNullOffset")
    Var Handle __GetOwnControlParasproc  = GetProcAddressM(hModule, "GetOwnControlParas")
    Var Handle __GetRealColumnIndexproc  = GetProcAddressM(hModule, "GetRealColumnIndex")
    Var Handle __GetSelectedproc  = GetProcAddressM(hModule, "GetSelected")
    Var Handle __GetSelectedCountproc  = GetProcAddressM(hModule, "GetSelectedCount")
    Var Handle __GetSelectedDbClkproc  = GetProcAddressM(hModule, "GetSelectedDbClk")
    Var Handle __GetSelectedLineproc  = GetProcAddressM(hModule, "GetSelectedLine")
    Var Handle __GetTabOffsetsproc  = GetProcAddressM(hModule, "GetTabOffsets")
    Var Handle __GetVarproc  = GetProcAddressM(hModule, "GetVar")
    Var Handle __GetVisibleColumnsproc  = GetProcAddressM(hModule, "GetVisibleColumns")
    Var Handle __GetVisibleLinesproc  = GetProcAddressM(hModule, "GetVisibleLines")
    Var Handle __HeaderToCsvproc  = GetProcAddressM(hModule, "HeaderToCsv")
    Var Handle __IColumnproc  = GetProcAddressM(hModule, "IColumn")
    Var Handle __InitMessagesproc  = GetProcAddressM(hModule, "InitMessages")
    Var Handle __ListviewToCsvproc  = GetProcAddressM(hModule, "ListviewToCsv")
    Var Handle __ListviewToDbfproc  = GetProcAddressM(hModule, "ListviewToDbf")
    Var Handle __ListviewToRawproc  = GetProcAddressM(hModule, "ListviewToRaw")
    Var Handle __MarkIfCheckedproc  = GetProcAddressM(hModule, "MarkIfChecked")
    Var Handle __MixRGBsproc  = GetProcAddressM(hModule, "MixRGBs")
    Var Handle __PrepareTxtToCsvproc  = GetProcAddressM(hModule, "PrepareTxtToCsv")
    Var Handle __PrintColumnsproc  = GetProcAddressM(hModule, "PrintColumns")
    Var Handle __PrintListviewproc  = GetProcAddressM(hModule, "PrintListview")
    Var Handle __RaiseColumnsproc  = GetProcAddressM(hModule, "RaiseColumns")
    Var Handle __RaiseLineproc  = GetProcAddressM(hModule, "RaiseLine")
    Var Handle __RawToListviewproc  = GetProcAddressM(hModule, "RawToListview")
    Var Handle __ReadFileQuickproc  = GetProcAddressM(hModule, "ReadFileQuick")
    Var Handle __Registerproc  = GetProcAddressM(hModule, "Register")
    Var Handle __SItemproc  = GetProcAddressM(hModule, "SItem")
    Var Handle __SearchBlankItemproc  = GetProcAddressM(hModule, "SearchBlankItem")
    Var Handle __SearchTextproc  = GetProcAddressM(hModule, "SearchText")
    Var Handle __SelectColumnEditsproc  = GetProcAddressM(hModule, "SelectColumnEdits")
    Var Handle __SelectLineproc  = GetProcAddressM(hModule, "SelectLine")
    Var Handle __SetAllCheckboxStatesproc  = GetProcAddressM(hModule, "SetAllCheckboxStates")
    Var Handle __SetBackImageproc  = GetProcAddressM(hModule, "SetBackImage")
    Var Handle __SetCheckboxStateproc  = GetProcAddressM(hModule, "SetCheckboxState")
    Var Handle __SetColumnAlignmentproc  = GetProcAddressM(hModule, "SetColumnAlignment")
    Var Handle __SetColumnNameproc  = GetProcAddressM(hModule, "SetColumnName")
    Var Handle __SetColumnSortproc  = GetProcAddressM(hModule, "SetColumnSort")
    Var Handle __SetColumnUpdateproc  = GetProcAddressM(hModule, "SetColumnUpdate")
    Var Handle __SetColumnWidthproc  = GetProcAddressM(hModule, "SetColumnWidth")
    Var Handle __SetColumnsWidthLimitsproc  = GetProcAddressM(hModule, "SetColumnsWidthLimits")
    Var Handle __SetFilelistFilterproc  = GetProcAddressM(hModule, "SetFilelistFilter")
    Var Handle __SetFilelistNoFilterproc  = GetProcAddressM(hModule, "SetFilelistNoFilter")
    Var Handle __SetIconproc  = GetProcAddressM(hModule, "SetIcon")
    Var Handle __SetIconColumnproc  = GetProcAddressM(hModule, "SetIconColumn")
    Var Handle __SetIconModeproc  = GetProcAddressM(hModule, "SetIconMode")
    Var Handle __SetIconsFromMemproc  = GetProcAddressM(hModule, "SetIconsFromMem")
    Var Handle __SetIconsWithproc  = GetProcAddressM(hModule, "SetIconsWith")
    Var Handle __SetImageListproc  = GetProcAddressM(hModule, "SetImageList")
    Var Handle __SetIndexproc  = GetProcAddressM(hModule, "SetIndex")
    Var Handle __SetItemTextproc  = GetProcAddressM(hModule, "SetItemText")
    Var Handle __SetItemTextExproc  = GetProcAddressM(hModule, "SetItemTextEx")
    Var Handle __SetLineHeightproc  = GetProcAddressM(hModule, "SetLineHeight")
    Var Handle __SetLineNumbersproc  = GetProcAddressM(hModule, "SetLineNumbers")
    Var Handle __SetListviewStyleproc  = GetProcAddressM(hModule, "SetListviewStyle")
    Var Handle __SetPrintAttributesproc  = GetProcAddressM(hModule, "SetPrintAttributes")
    Var Handle __SetVarproc  = GetProcAddressM(hModule, "SetVar")
    Var Handle __ShowListviewproc  = GetProcAddressM(hModule, "ShowListview")
    Var Handle __SortManualproc  = GetProcAddressM(hModule, "SortManual")
    Var Handle __SwapLinesproc  = GetProcAddressM(hModule, "SwapLines")
    Var Handle __UpdateListviewproc  = GetProcAddressM(hModule, s=s3>"UpdateListview")

ENDIF

.ph - Expediente :
KompilierenMarcaSeparación
ASortListview( = CALL(__ASortListviewproc,;
ASortListviewEx( = CALL(__ASortListviewExproc,;
AddItemValues( = CALL(__AddItemValuesproc,;
AreCheckboxesPresent( = CALL(__AreCheckboxesPresentproc,;
AreIconsPresent( = CALL(__AreIconsPresentproc,;
BuildListview( = CALL(__BuildListviewproc,;
CheckIfMarked( = CALL(__CheckIfMarkedproc,;
ClearListview( = CALL(__ClearListviewproc,;
CloseMessages( = CALL(__CloseMessagesproc,;
ConvertDatas( = CALL(__ConvertDatasproc,;
CopyColumnTo( = CALL(__CopyColumnToproc,;
CopyLineTo( = CALL(__CopyLineToproc,;
CreateImageList( = CALL(__CreateImageListproc,;
CreateListview( = CALL(__CreateListviewproc,;
CryptMem( = CALL(__CryptMemproc,;
CsvToHeader( = CALL(__CsvToHeaderproc,;
CsvToListview( = CALL(__CsvToListviewproc,;
DbfToCsv( = CALL(__DbfToCsvproc,;
DeleteAllItems( = CALL(__DeleteAllItemsproc,;
DeleteColumn( = CALL(__DeleteColumnproc,;
DeleteDoubleItems( = CALL(__DeleteDoubleItemsproc,;
DeleteItem( = CALL(__DeleteItemproc,;
DeleteSpaceLines( = CALL(__DeleteSpaceLinesproc,;
EditManual( = CALL(__EditManualproc,;
EnableDragDrop( = CALL(__EnableDragDropproc,;
EnableEdits( = CALL(__EnableEditsproc,;
EraseListview( = CALL(__EraseListviewproc,;
ExamineColumn( = CALL(__ExamineColumnproc,;
ExchangeBytes( = CALL(__ExchangeBytesproc,;
ExchangeSeparator( = CALL(__ExchangeSeparatorproc,;
FilelistToCsv( = CALL(__FilelistToCsvproc,;
ForbidScrollMessage( = CALL(__ForbidScrollMessageproc,;
GetAllCheckboxStates( = CALL(__GetAllCheckboxStatesproc,;
GetAllSelected( = CALL(__GetAllSelectedproc,;
GetCheckboxState( = CALL(__GetCheckboxStateproc,;
GetChecked( = CALL(__GetCheckedproc,;
GetColumnName( = CALL(__GetColumnNameproc,;
GetColumnUpdate( = CALL(__GetColumnUpdateproc,;
GetColumnWidth( = CALL(__GetColumnWidthproc,;
GetColumns( = CALL(__GetColumnsproc,;
GetControlParas( = CALL(__GetControlParasproc,;
GetDllVersion( = CALL(__GetDllVersionproc,;
GetDragDropParas( = CALL(__GetDragDropParasproc,;
GetEdgeFloats( = CALL(__GetEdgeFloatsproc,;
GetEdgeIntegers( = CALL(__GetEdgeIntegersproc,;
GetFloat( = CALL(__GetFloatproc,;
GetIcon( = CALL(__GetIconproc,;
GetIndex( = CALL(__GetIndexproc,;
GetItemState( = CALL(__GetItemStateproc,;
GetItemText( = CALL(__GetItemTextproc,;
GetItemTextEx( = CALL(__GetItemTextExproc,;
GetItemTextsAsFloat( = CALL(__GetItemTextsAsFloatproc,;
GetItemTextsAsInteger( = CALL(__GetItemTextsAsIntegerproc,;
GetLastKey( = CALL(__GetLastKeyproc,;
GetLineText( = CALL(__GetLineTextproc,;
GetLines( = CALL(__GetLinesproc,;
GetNeededMemory( = CALL(__GetNeededMemoryproc,;
GetNullOffset( = CALL(__GetNullOffsetproc,;
GetOwnControlParas( = CALL(__GetOwnControlParasproc,;
GetRealColumnIndex( = CALL(__GetRealColumnIndexproc,;
GetSelected( = CALL(__GetSelectedproc,;
GetSelectedCount( = CALL(__GetSelectedCountproc,;
GetSelectedDbClk( = CALL(__GetSelectedDbClkproc,;
GetSelectedLine( = CALL(__GetSelectedLineproc,;
GetTabOffsets( = CALL(__GetTabOffsetsproc,;
GetVar( = CALL(__GetVarproc,;
GetVisibleColumns( = CALL(__GetVisibleColumnsproc,;
GetVisibleLines( = CALL(__GetVisibleLinesproc,;
HeaderToCsv( = CALL(__HeaderToCsvproc,;
IColumn( = CALL(__IColumnproc,;
InitMessages( = CALL(__InitMessagesproc,;
ListviewToCsv( = CALL(__ListviewToCsvproc,;
ListviewToDbf( = CALL(__ListviewToDbfproc,;
ListviewToRaw( = CALL(__ListviewToRawproc,;
MarkIfChecked( = CALL(__MarkIfCheckedproc,;
MixRGBs( = CALL(__MixRGBsproc,;
PrepareTxtToCsv( = CALL(__PrepareTxtToCsvproc,;
PrintColumns( = CALL(__PrintColumnsproc,;
PrintListview( = CALL(__PrintListviewproc,;
RaiseColumns( = CALL(__RaiseColumnsproc,;
RaiseLine( = CALL(__RaiseLineproc,;
RawToListview( = CALL(__RawToListviewproc,;
ReadFileQuick( = CALL(__ReadFileQuickproc,;
Register( = CALL(__Registerproc,;
SItem( = CALL(__SItemproc,;
SearchBlankItem( = CALL(__SearchBlankItemproc,;
SearchText( = CALL(__SearchTextproc,;
SelectColumnEdits( = CALL(__SelectColumnEditsproc,;
SelectLine( = CALL(__SelectLineproc,;
SetAllCheckboxStates( = CALL(__SetAllCheckboxStatesproc,;
SetBackImage( = CALL(__SetBackImageproc,;
SetCheckboxState( = CALL(__SetCheckboxStateproc,;
SetColumnAlignment( = CALL(__SetColumnAlignmentproc,;
SetColumnName( = CALL(__SetColumnNameproc,;
SetColumnSort( = CALL(__SetColumnSortproc,;
SetColumnUpdate( = CALL(__SetColumnUpdateproc,;
SetColumnWidth( = CALL(__SetColumnWidthproc,;
SetColumnsWidthLimits( = CALL(__SetColumnsWidthLimitsproc,;
SetFilelistFilter( = CALL(__SetFilelistFilterproc,;
SetFilelistNoFilter( = CALL(__SetFilelistNoFilterproc,;
SetIcon( = CALL(__SetIconproc,;
SetIconColumn( = CALL(__SetIconColumnproc,;
SetIconMode( = CALL(__SetIconModeproc,;
SetIconsFromMem( = CALL(__SetIconsFromMemproc,;
SetIconsWith( = CALL(__SetIconsWithproc,;
SetImageList( = CALL(__SetImageListproc,;
SetIndex( = CALL(__SetIndexproc,;
SetItemText( = CALL(__SetItemTextproc,;
SetItemTextEx( = CALL(__SetItemTextExproc,;
SetLineHeight( = CALL(__SetLineHeightproc,;
SetLineNumbers( = CALL(__SetLineNumbersproc,;
SetListviewStyle( = CALL(__SetListviewStyleproc,;
SetPrintAttributes( = CALL(__SetPrintAttributesproc,;
SetVar( = CALL(__SetVarproc,;
ShowListview( = CALL(__ShowListviewproc,;
SortManual( = CALL(__SortManualproc,;
SwapLines( = CALL(__SwapLinesproc,;
UpdateListview( = CALL(__UpdateListviewproc,;

Hauptprogramm :
KompilierenMarcaSeparación
 $H Listview.ph
 $I Listview.inc
Declarar Handle gView
Declarar String spalte
Ventana 600, 450
'Listview redactar
gView = ~CreateListview(%HWnd, %HInstance, 0, $ffffff, -1, $31)
spalte = "1.Spalte"
~IColumn(gView, spalte, 120, 0)
spalte = "2. Spalte"
~IColumn(gView, spalte, 240, 0)
~ShowListview(gView, 10, 250, 400, 100)
Waitkey
FreeLibraryM(hModule)
Disponer FN, LV
End

So, scheint a trabajo.
Gracias IF para el Unterstützung.
El komplette .inc + .ph son oben angehängt,
si alguien ellos braucht.
 
Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.
15.10.2014  ▲
 



No bastante verstanden, Reihenfolge Einbindung INC & PH es egal.

El PH wir statisch einkompiliert - ellos a Laufzeit erzeugen macht no Sinn salvo una vez en se incluso a helfen una PH a erzeugen.

In el PH es sí sólo call(__1&, y el INC wiederum como se sí
sólo __1& deklariert y el Addr-Valor befüllt por "getProcAddr".
 
14.10.2014  ▲
 




H.Brill
Jetzt verstehe Yo.
Dann muß Yo aber zuerst el .inc einbinden
y luego el .ph.

Como sieht en el el fertigen .Exe de ?
Pensé, daß el .ph vom Compiler aufgelöst
se, sprich el Werte ersetzt. Woher se él porque
wissen, qué para Adressen, el cada Programmstart
de Memorymodule (o. Windows) neu gesetzt voluntad,
el son ? Anscheinend ha se como Roland en el Ayuda
falso ausgedrückt.

Yo probiers morgen veces de (muß en halb vier aufstehen).
Ansonsten speichere Yo el DLL como gehabt de el Resource
con BlockWrite en Platte y rufe ImportDLL() en.
En Programmende se ellos otra vez gelöscht.
 
Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.
14.10.2014  ▲
 



Como hast Usted 1 Schritt vergessen, Yo schrieb sí:


dieAndereFunktion=getprocaddr(...,


Ergo mache doch simplemente en lugar de:

DeleteItem( = CALL(76852721,;


dies:

DeleteItem( = CALL(__deleteitemproc,;


y el INC wiederum machst Usted:

var handle __deleteitemproc=getProcAddr(...

Das meinte I, con Usted necesidad ne INC y ne PH.
 
14.10.2014  ▲
 




H.Brill
El Listview.dll kannste sí en Franks Página invitar.
El tener Yo simplemente con un Resourcetool en el
Profano.exe como RCDATA eingefügt.
So sieht el .ph entonces de :
KompilierenMarcaSeparación
ASortListview( = CALL(76824682,;
ASortListviewEx( = CALL(76850266,;
AddItemValues( = CALL(76845879,;
AreCheckboxesPresent( = CALL(76843157,;
AreIconsPresent( = CALL(76843202,;
BuildListview( = CALL(76851016,;
CheckIfMarked( = CALL(76844826,;
ClearListview( = CALL(76851179,;
CloseMessages( = CALL(76829268,;
ConvertDatas( = CALL(76849693,;
CopyColumnTo( = CALL(76832168,;
CopyLineTo( = CALL(76832728,;
CreateImageList( = CALL(76827867,;
CreateListview( = CALL(76823966,;
CryptMem( = CALL(76829751,;
CsvToHeader( = CALL(76829313,;
CsvToListview( = CALL(76824848,;
DbfToCsv( = CALL(76829800,;
DeleteAllItems( = CALL(76852748,;
DeleteColumn( = CALL(76852694,;
DeleteDoubleItems( = CALL(76848284,;
DeleteItem( = CALL(76852721,;
DeleteSpaceLines( = CALL(76849472,;
EditManual( = CALL(76851474,;
EnableDragDrop( = CALL(76849360,;
EnableEdits( = CALL(76833567,;
EraseListview( = CALL(76843237,;
ExamineColumn( = CALL(76836784,;
ExchangeBytes( = CALL(76850011,;
ExchangeSeparator( = CALL(76832643,;
FilelistToCsv( = CALL(76834377,;
ForbidScrollMessage( = CALL(76849994,;
GetAllCheckboxStates( = CALL(76848805,;
GetAllSelected( = CALL(76827036,;
GetCheckboxState( = CALL(76833521,;
GetChecked( = CALL(76833341,;
GetColumnName( = CALL(76847162,;
GetColumnUpdate( = CALL(76837063,;
GetColumnWidth( = CALL(76829241,;
GetColumns( = CALL(76826022,;
GetControlParas( = CALL(76843468,;
GetDllVersion( = CALL(76848987,;
GetDragDropParas( = CALL(76849642,;
GetEdgeFloats( = CALL(76848061,;
GetEdgeIntegers( = CALL(76847736,;
GetFloat( = CALL(76848033,;
GetIcon( = CALL(76847326,;
GetIndex( = CALL(76832628,;
GetItemState( = CALL(76852774,;
GetItemText( = CALL(76836699,;
GetItemTextEx( = CALL(76850933,;
GetItemTextsAsFloat( = CALL(76847809,;
GetItemTextsAsInteger( = CALL(76847524,;
GetLastKey( = CALL(76850318,;
GetLineText( = CALL(76829016,;
GetLines( = CALL(76825996,;
GetNeededMemory( = CALL(76826063,;
GetNullOffset( = CALL(76827351,;
GetOwnControlParas( = CALL(76844156,;
GetRealColumnIndex( = CALL(76844739,;
GetSelected( = CALL(76825912,;
GetSelectedCount( = CALL(76852668,;
GetSelectedDbClk( = CALL(76825752,;
GetSelectedLine( = CALL(76828950,;
GetTabOffsets( = CALL(76825836,;
GetVar( = CALL(76845234,;
GetVisibleColumns( = CALL(76852273,;
GetVisibleLines( = CALL(76852454,;
HeaderToCsv( = CALL(76852856,;
IColumn( = CALL(76824285,;
InitMessages( = CALL(76823917,;
ListviewToCsv( = CALL(76827461,;
ListviewToDbf( = CALL(76831194,;
ListviewToRaw( = CALL(76850433,;
MarkIfChecked( = CALL(76845488,;
MixRGBs( = CALL(76837636,;
PrepareTxtToCsv( = CALL(76848758,;
PrintColumns( = CALL(76847456,;
PrintListview( = CALL(76843143,;
RaiseColumns( = CALL(76837420,;
RaiseLine( = CALL(76846132,;
RawToListview( = CALL(76850652,;
ReadFileQuick( = CALL(76824772,;
Register( = CALL(76828996,;
SItem( = CALL(76824408,;
SearchBlankItem( = CALL(76853071,;
SearchText( = CALL(76830610,;
SelectColumnEdits( = CALL(76845004,;
SelectLine( = CALL(76830444,;
SetAllCheckboxStates( = CALL(76848907,;
SetBackImage( = CALL(76837774,;
SetCheckboxState( = CALL(76833424,;
SetColumnAlignment( = CALL(76848694,;
SetColumnName( = CALL(76847243,;
SetColumnSort( = CALL(76837000,;
SetColumnUpdate( = CALL(76837243,;
SetColumnWidth( = CALL(76852802,;
SetColumnsWidthLimits( = CALL(76850387,;
SetFilelistFilter( = CALL(76845683,;
SetFilelistNoFilter( = CALL(76845781,;
SetIcon( = CALL(76828634,;
SetIconColumn( = CALL(76847309,;
SetIconMode( = CALL(76845360,;
SetIconsFromMem( = CALL(76828727,;
SetIconsWith( = CALL(76828842,;
SetImageList( = CALL(76828607,;
SetIndex( = CALL(76828976,;
SetItemText( = CALL(76836621,;
SetItemTextEx( = CALL(76850857,;
SetLineHeight( = CALL(76850208,;
SetLineNumbers( = CALL(76848999,;
SetListviewStyle( = CALL(76844722,;
SetPrintAttributes( = CALL(76850142,;
SetVar( = CALL(76847404,;
ShowListview( = CALL(76824225,;
SortManual( = CALL(76833608,;
SwapLines( = CALL(76825389,;
UpdateListview( = ref='./../../funktionsreferenzen/XProfan/call/'>CALL(76852830,;

Das puede ser aber sowieso alles vergessen, porque se cada
Programmstart auch el Adressen ändern. Also ha uno beim
fertigen exe-Programa no Chance, como el Compiler sí no
mehr como es, a .ph aufzulösen.
 
Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.
14.10.2014  ▲
 



Georg Teles (14.10.14)
Das verstehe Yo no bastante, el Características haben sí verschiedene Anzahl de Parametern & el necesario sí berücksichtigt voluntad


El Anzahl el P. es el PH-Expediente egal y se sí por el Aufruf incluso
festgelegt.

Lo va en PH-Expediente en diesem Fall sí "nur" por lo tanto, de:

meineFunction(...


dies a hacer:

call(somefunc12345&,...


@Heinz: Como sieht el PH de y hast Usted veces el DLL?
 
14.10.2014  ▲
 




H.Brill
Yo hätte me ahora así pensamiento, Yo el .ph
zuerst escribir y luego con $H einlese :
KompilierenMarcaSeparación
 $I MemoryModule.inc
Declare Handle hResInfo, hModule, Grid, gView
Declare Memory FN, LV
Declare Int anz, String Func, spalte
Declare pfunc&
Window 600, 450
Grid = @Create("Gridbox", %HWnd, "Nr;0;50;Adresse;0;100;Funktionsname;0;200", 0, 80, 10, 400, 200)
ShowWindow(Grid, 0)
hResInfo = Res("Info", %HInstance, 10, "listview", 0)

IF hResInfo > 0

    Dim LV, Res("size", %HInstance, hResInfo)
    LV = Res("Get", %HInstance, hResInfo)
    hModule = LoadLibraryM(LV)

EndIf

hResInfo = Res("Info", %HInstance, 10, "FUNKTIONEN", 0)

IF hResInfo > 0

    Dim FN, Res("size", %HInstance, hResInfo)
    FN = Res("Get", %HInstance, hResInfo)
    anz = Move("MemToList", FN, Chr$(13)+ chr$(10))
    Assign #1, $ProgDir + "INCLUDE\Listview.ph"
    Rewrite #1

    WHILELOOP 0, anz - 1

        Func = GetString$(0, &LOOP)
        'IMPORTFUNC(hModule, Func, "")  ' Geht hier nicht
        pFunc& = GetProcAddressM(hModule, Func)
        AddString(Grid, Str$(&LOOP) + "|" + Str$(pFunc&) + "|" + Func)
        Print #1, Func; "( = CALL(";Str$(pFunc&);",;"

    ENDWHILE

    Close #1

ENDIF

Print "Fertig..."
Waitkey
 $H Listview.ph
ShowWindow(Grid, 1)
' Listview erstellen
gView = ~CreateListview(%HWnd, %HInstance, 0, $ffffff, -1, $31)
spalte = "1.Spalte"
~IColumn(gView, spalte, 120, 0)
spalte = "2. Spalte"
~IColumn(gView, spalte, 240, 0)
~ShowListview(gView, 10, 250, 400, 100)
Waitkey
FreeLibraryM(hModule)
End

Aber irgendwie es como todavía el Wurm drin.
 
Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.
14.10.2014  ▲
 




H.Brill
Yo hätte me ahora así pensamiento, Yo el .ph
zuerst escribir y luego con $H einlese :
KompilierenMarcaSeparación
 $I MemoryModule.inc
Declare Handle hResInfo, hModule, Grid, gView
Declare Memory FN, LV
Declare Int anz, String Func, spalte
Declare pfunc&
Window 600, 450
Grid = @Create("Gridbox", %HWnd, "Nr;0;50;Adresse;0;100;Funktionsname;0;200", 0, 80, 10, 400, 200)
ShowWindow(Grid, 0)
hResInfo = Res("Info", %HInstance, 10, "listview", 0)

IF hResInfo > 0

    Dim LV, Res("size", %HInstance, hResInfo)
    LV = Res("Get", %HInstance, hResInfo)
    hModule = LoadLibraryM(LV)

EndIf

hResInfo = Res("Info", %HInstance, 10, "FUNKTIONEN", 0)

IF hResInfo > 0

    Dim FN, Res("size", %HInstance, hResInfo)
    FN = Res("Get", %HInstance, hResInfo)
    anz = Move("MemToList", FN, Chr$(13)+ chr$(10))
    Assign #1, $ProgDir + "INCLUDE\Listview.ph"
    Rewrite #1

    WHILELOOP 0, anz - 1

        Func = GetString$(0, &LOOP)
        'IMPORTFUNC(hModule, Func, "")  ' Geht hier nicht
        pFunc& = GetProcAddressM(hModule, Func)
        AddString(Grid, Str$(&LOOP) + "|" + Str$(pFunc&) + "|" + Func)
        Print #1, Func; "( = CALL(";Str$(pFunc&);",;"

    ENDWHILE

    Close #1

ENDIF

Print "Fertig..."
Waitkey
 $H Listview.ph
ShowWindow(Grid, 1)
' Listview erstellen
gView = ~CreateListview(%HWnd, %HInstance, 0, $ffffff, -1, $31)
spalte = "1.Spalte"
~IColumn(gView, spalte, 120, 0)
spalte = "2. Spalte"
~IColumn(gView, spalte, 240, 0)
~ShowListview(gView, 10, 250, 400, 100)
Waitkey
FreeLibraryM(hModule)
./../../funktionsreferenzen/XProfan/end/'>End

Aber irgendwie es como todavía el Wurm drin.
 
Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.
14.10.2014  ▲
 




Georg
Teles
Das verstehe Yo no bastante, el Características haben sí verschiedene Anzahl de Parametern & el necesario sí berücksichtigt voluntad
 
XProfan X2
TC-Programming [...] 
XProfan 8.0 - 10.0 - X2 - X3 - X4

14.10.2014  ▲
 



Georg Teles (14.10.14)
Naja, es ya nervig 117 a escribir


¿Puede sí por PH de una call(proc117,"test") simplemente una
foo("test") hacer.
 
14.10.2014  ▲
 



◄►

Respuesta


Título del Tema, max. 100 Signo.
 

Systemprofile:

Kein Systemprofil creado. [anlegen]

XProfan:

 Contribución  Font  Smilies  ▼ 

Bitte registro en una Contribución a verfassen.
 

Tema opciones

Unreaded
subscribe
Remember-List
Notes
guests
Delete
Constantemente
Hecho

35.812 Views

Untitledvor 0 min.
Stringray09.05.2022
Rolf Koch03.10.2021
Axel Berse16.07.2021
Jörg Sellmeyer28.05.2020
Más...

Themeninformationen

Dieses Thema ha 8 subscriber:

H.Brill (20x)
Michael W. (16x)
iF (7x)
Jörg Sellmeyer (5x)
ByteAttack (3x)
Georg Teles (3x)
Manfred Barei (1x)
Christof Neuß (1x)


Admins  |  AGB  |  Applications  |  Autores  |  Chat  |  Política de Privacidad  |  Descargar  |  Entrance  |  Ayuda  |  Merchantportal  |  Pie de imprenta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Juegos  |  Búsqueda  |  Support

Ein Projekt aller XProfan, el lo son!


Mi XProfan
Privado Noticias
Eigenes Ablageforum
Temas-Merkliste
Eigene Beiträge
Eigene Temas
Zwischenablage
Cancelar
 Deutsch English Français Español Italia
Traducciones

Política de Privacidad


Wir uso Cookies sólo como Session-Cookies wegen el technischen Notwendigkeit y en uns hay no Cookies de Drittanbietern.

Wenn du hier en unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung de Informationen en unseren Cookies en XProfan.Net a.

Weitere Informationen a unseren Cookies y dazu, como du el Kontrolle darüber behältst, findest du en unserer nachfolgenden Datenschutzerklärung.

einverstandenDatenschutzerklärung
Yo möchte no Cookie