小编die*_*lar的帖子

用Delphi中的索引替换字符串中的一个字符?

我尝试了以下代码但没有成功.

string.remove[index];
string.insert[index];
Run Code Online (Sandbox Code Playgroud)

任何人都可以建议我如何更正此代码?

delphi string

1
推荐指数
2
解决办法
7323
查看次数

为什么在CSS中添加线边框会弄乱其正确的位移?

根据另一个问题的答案,我试图在位于外部的div中添加线边框。

但是,这会导致div 混乱,为什么呢?

标记

<div id="outer">
        <div id="chart"></div>
        <div id="table"></div>
</div>
Run Code Online (Sandbox Code Playgroud)

的CSS

#outer{

width: 1300px; 
height: 640px;
border: 1px solid black;
}

#chart{

  float:left;
  width: 900px;
  height: 100%;
  left:0;
  background-color: red;
}

#table{

  float:right;
  width: 400px;
  height: 100%;
  right:400;
  background-color: yellow;
  border: 1px solid back;

}
Run Code Online (Sandbox Code Playgroud)

html css

1
推荐指数
1
解决办法
1672
查看次数

如何在Delphi函数中设置不同的结果值?

我正在对这个函数进行编码,对于我设置result := -10编译器的行给出了一个警告,说这样的值永远不会被赋值.我的逻辑有什么问题吗?

function combine (m1, m2 : string) : integer;
var
dash : integer;
distinct : integer;
i : integer;

begin
distinct := 0;
dash := -1;

for i := 0 to Length(m1)-1 do
begin
    if m1[i] = m2[i] then
    begin
      distinct := distinct+1;
      dash := i;
      if distinct > 1 then
          result:= -10;
    end;
end;

result := dash;
end;
Run Code Online (Sandbox Code Playgroud)

delphi function

0
推荐指数
1
解决办法
230
查看次数

Access violation in Delphi?

我得到了以下代码,它应该正确地访问矩阵位置,但是我总是得到这种访问违规...

var
tabla : array of array of string;

....
implementation

SetLength(tabla, minterms.Count+1, minterms_essentials.Count+1);

for i := 0 to minterms.Count-1 do
begin
  tabla[i+2,1] := minterms[i];
end;

for i := 0 to minterms_essentials.Count-1 do
begin
  tabla[1, i+2] := minterms_essentials[i];
end;

end
Run Code Online (Sandbox Code Playgroud)

基本上,我正在生成一个表,在循环中我试图在第二个循环中填充列标记和行标记.只要我知道,数组从1开始.

tabla[1][1]是一个空置的指数,这就是为什么我没有触及它.

为什么访问违规?

arrays delphi exception matrix

0
推荐指数
1
解决办法
2084
查看次数

三元运算符用法?

我知道三元运算符用于在评估逻辑条件后进行变量赋值.

所以:

String s = (logicalVariable) ? "Hello" : "Bye, bye";
Run Code Online (Sandbox Code Playgroud)

要么,

int x = (5<3) ? 10 : 100;
Run Code Online (Sandbox Code Playgroud)

将是用法示例,对吧?

但是,如果我真的不想做变量赋值但是设置一个句子甚至一段代码,例如:

if (inventario.containsKey(item))
        return inventario.get(item);
    else return Integer.MIN_VALUE;
Run Code Online (Sandbox Code Playgroud)

可以使用三元运算符将这些行写成一行表达式吗?

java ternary-operator conditional-statements

0
推荐指数
2
解决办法
72
查看次数

如何正确使用react-router的嵌套路由?

我正试图在/dashboard路径下使用react-router获得嵌套的UI ,所以我得到了:

<Route
  path={'/dashboard'}
  component={Components.Dashboard}
  onEnter={utils.onlyAfterLogin}>

  <Route
    path={'/tiendas'}
    component={Components.StoresIndex} />

</Route>
Run Code Online (Sandbox Code Playgroud)

我想'/dashboard'成为一个父路由,它有自己的UI东西,并包括呈现为嵌套路径的嵌套UI.所以'/dashboard/tiendas'应该渲染仪表板的东西和Components.StoresIndex组件.

当我尝试访问时'/dashboard/tiendas',它会抛出一个警告日志:

warning: [react-router] Location "/dashboard/tiendas" did not match any routes

仪表板的东西渲染得很好,这就是Dashboard组件的样子(仅显示渲染方法):

  render () {
    return (
      <div>
        <AppBar
          title="Distribuidores Movistar"
          onLeftIconButtonTouchTap={() => {this.setState({leftNavOpen:true})}}
          iconElementRight={
            <IconMenu
              iconButtonElement={
                <IconButton><MoreVertIcon /></IconButton>
              }
              targetOrigin={{horizontal: 'right', vertical: 'top'}}
              anchorOrigin={{horizontal: 'right', vertical: 'top'}}
            >
              <MenuItem primaryText="Cerrar sessión" />
            </IconMenu>
          }
        />
        <LeftNav open={this.state.leftNavOpen}>
          <MenuItem>Ventas</MenuItem>
          <MenuItem>Inventario</MenuItem>
          <MenuItem>Usuarios</MenuItem>
          <MenuItem>Tiendas</MenuItem>
          <MenuItem>Configuraciones</MenuItem>
          <Divider/>
          <FloatingActionButton mini={true} style={{marginRight: 20}}>
            <ContentAdd …
Run Code Online (Sandbox Code Playgroud)

javascript reactjs react-router

0
推荐指数
1
解决办法
719
查看次数

Delphi中字符串和字符串(大小写更改)是否相同?

它们类似于原始类和类类型吗?

对于

function binaryFormat (binary:String; n:Integer) : String;
Run Code Online (Sandbox Code Playgroud)

function binaryFormat (binary:String; n:Integer) : string;
Run Code Online (Sandbox Code Playgroud)

他们的结果值是否相同?

delphi string

-1
推荐指数
2
解决办法
499
查看次数

Delphi中的索引订单?

我基本上编写了某种表格,对于列标签,我有一些数字,对于行标签,我有一些字符串,其中包含用逗号分隔的数字.

我从名为的TString中获取所有行标记,minterms_essentials并从一个名称中获取列标记minterms.

首先,我必须标记创建的2维数组.然后,如果行中的任何字符串包含某个字母,我必须'x'在正确的列中放置一个字符串.

我写了这个Delphi代码,但到目前为止我正在访问违规...

SetLength(tabla,minterms_essentials.Count + 1,minterms.Count + 1);

for i := 0 to minterms.Count-1 do
begin
  tabla[0,i+1] := IntToStr(BinToInt(minterms[i]));
end;

for i := 0 to minterms_essentials.Count-1 do
begin
  tabla[i+1,0] := minterms_essentials[i];
end;

for i := 1 to minterms_essentials.Count-1 do
begin
for g := 1 to minterms.Count-1 do
  begin
    ss := tabla[g,0].Split([',']);
    for s in ss do
      begin
        if s = tabla[0,g] then
          begin
            tabla[g,i] := 'x';
          end; …
Run Code Online (Sandbox Code Playgroud)

delphi matrix

-1
推荐指数
1
解决办法
125
查看次数

-3
推荐指数
1
解决办法
3441
查看次数